Pirate's Signature v1.0
Emulation Item Preview
Share or Embed This Item
Notes
Disk info for Pirates_Signature_v1.0_1984_Johnney_Appleseed.do:
File Name: a2_Pirates_Signature_v1.0_1984_Johnney_Appleseed/Pirates_Signature_v1.0_1984_Johnney_Appleseed.do
Disk Name: DISK VOLUME #254
Physical Size (bytes): 143360
Free Space (bytes): 127232
Used Space (bytes): 16128
Physical Size (KB): 140
Free Space (KB): 124
Used Space (KB): 15
Archive Order: DOS
Disk Format: DOS 3.3
Total Sectors: 560
Free Sectors: 497
Used Sectors: 63
Tracks On Disk: 35
Sectors On Disk: 16
Disk directory for Pirates_Signature_v1.0_1984_Johnney_Appleseed.do:
a2_Pirates_Signature_v1.0_1984_Johnney_Appleseed/Pirates_Signature_v1.0_1984_Johnney_Appleseed.do DISK VOLUME #254
B 003 CRUNCH
B 026 DAGA
B 002 DISPLAYER
* B 010 DOC.HELP
B 002 DOC.HELPER
* A 019 HELLO
* A 003 INSTRUCTIONS
* A 002 INTRO
B 022 INTRO.DATA
* A 002 PS
* A 004 PS2
* A 008 PS3
B 006 RAD BOARDS
* B 003 TEMP.DATA
* B 006 TEMPLATE.1
* A 010 THE DOCUMENTOR
* A 037 DRAW
* A 029 DRAW INST
* B 020 DRAW.OBJ
* B 013 DRAW LOGO
* B 002 UNPACK
* A 002 HOW TO VIEW A PACKED PICTURE
* B 008 NIAUG
DOS 3.3 format; 127,232 bytes free; 16,128 bytes used.
Text found in Pirates_Signature_v1.0_1984_Johnney_Appleseed.do/DAGA.txt:
Offset Hex Data Characters
======= ================================================ =================
$000000 10 09 12 01 14 05 27 13 20 13 09 07 0E 01 14 15 ......'. .......
$000010 12 05 20 16 31 2E 30 20 20 20 20 20 36 2F 32 34 .. .1.0 6/24
$000020 2F 31 39 38 34 20 20 20 A0 A0 A0 88 81 96 85 A0 /1984 ....
$000030 89 8E 90 8C 81 8E 94 85 84 A0 8D 81 8E 99 A0 83 ........ . .... .
$000040 88 85 83 8B 89 8E 87 A0 92 8F 95 94 89 8E 85 93 ....... ........
$000050 A0 A0 A0 81 8E 84 A0 82 8F 8F 94 A0 94 88 85 A0 ... . ... ...
$000060 8D 8F 84 89 86 89 85 84 A0 84 89 93 8B AE A0 A0 ........ .....
$000070 A0 A0 A0 A0 A0 A0 A0 A0 15 93 AA C9 A0 F0 2A AD ..*I p*-
$000080 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000090 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0000A0 20 20 20 20 20 20 20 20 A0 A0 A0 94 8F A0 8D 81 .. ..
$0000B0 8B 85 A0 93 95 92 85 A0 89 A0 87 85 94 A0 93 8F .. .... . ... ..
$0000C0 8D 85 A0 83 92 85 84 89 94 A0 86 8F 92 A0 A0 A0 .. ..... . ...
$0000D0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0000E0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0000F0 A0 A0 A0 A0 A0 A0 A0 A0 04 A9 5D 0A A9 D0 93 AE .)].)P..
$000100 20 20 20 20 20 20 20 20 20 13 19 13 14 05 0D 20 ......
$000110 09 0E 06 0F 12 0D 01 14 09 0F 0E 20 20 20 20 20 ........ ...
$000120 20 20 20 20 20 20 20 20 A0 A0 A0 94 88 89 93 A0 ....
$000130 90 92 8F 87 92 81 8D AE A0 A0 94 88 89 93 A0 86 ........ .... .
$000140 89 92 93 94 A0 96 85 92 93 89 8F 8E A0 89 93 A0 .... ... .... ..
$000150 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000160 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000170 A0 A0 A0 A0 A0 A0 A0 A0 27 9C 20 80 A1 4C 83 9F '. .!L..
$000180 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000190 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0001A0 20 20 20 20 20 20 20 20 A0 A0 A0 81 A0 8C 89 94 . ...
$0001B0 94 8C 85 A0 90 92 89 8D 89 94 89 96 85 AC A0 82 ... .... ....., .
$0001C0 95 94 A0 94 88 85 A0 8E 85 98 94 A0 A0 A0 A0 A0 .. ... . ...
$0001D0 A0 A0 9B 85 93 83 9D A0 94 8F A0 85 8E 84 A0 A0 ..... .. ...
$0001E0 A0 A0 9B 83 AF 92 9D A0 94 8F A0 94 88 89 93 A0 ../.. .. ....
$0001F0 90 81 87 85 A0 A0 A0 A0 60 45 90 CF 38 60 06 44 .... `E.O8`.D
$000200 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000210 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000220 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 96 85 92 93 89 .....
$000230 8F 8E A0 93 88 8F 95 8C 84 A0 88 81 96 85 A0 8D .. ..... . .... .
$000240 81 8E 99 A0 8E 85 97 A0 89 8D 90 92 8F 96 85 AD ... ... .......-
$000250 A0 A0 9B 92 94 AE A0 81 92 92 8F 97 9D A0 86 8F .... . ..... ..
$000260 92 97 81 92 84 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 .....
$000270 A0 A0 A0 A0 A0 A0 A0 A0 60 A2 4C EA A2 A9 0C D0 `"Lj").P
$000280 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000290 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0002A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 8D 85 8E 94 93 .....
$0002B0 AE A0 A0 89 86 A0 99 8F 95 A0 84 8F A0 A2 90 8C . .. .. . .. "..
$0002C0 81 99 A2 A0 97 89 94 88 A0 8D 99 A0 A0 A0 A0 A0 .." .... ..
$0002D0 A0 A0 9B 8C 94 AE A0 81 92 92 8F 97 9D A0 82 81 .... . ..... ..
$0002E0 83 8B 97 81 92 84 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 ......
$0002F0 A0 A0 A0 A0 A0 A0 A0 A0 02 4C EA A2 20 AF A7 D0 .Lj" /'P
$000300 A0 A0 A0 90 8C 85 81 93 85 A0 84 8F A0 8E 8F 94 ..... . .. ...
$000310 A0 94 92 99 A0 94 8F A0 92 85 8D 8F 96 85 A0 8D ... .. ...... .
$000320 99 A0 8E 81 8D 85 A0 A0 A0 A0 A0 8C 8F 87 8F AC . .... ....,
$000330 A0 99 8F 95 A0 90 92 8F 82 81 82 8C 99 A0 97 89 ... ... ..... ..
$000340 8C 8C A0 8E 8F 94 A0 8E 8F 94 89 83 85 A0 A0 A0 .. ... . .....
$000350 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000360 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000370 A0 A0 A0 A0 A0 A0 A0 A0 29 01 D0 06 8E 72 AA 8C ).P..r*.
$000380 A0 A0 A0 81 8E 84 A0 8C 8F 87 8F A0 86 92 8F 8D ... . ... ....
$000390 A0 94 88 89 93 A0 84 89 93 8B AC A0 82 85 83 81 .... .. .., ....
$0003A0 95 93 85 A0 89 A0 A0 A0 A0 A0 A0 94 88 81 94 A0 ... . ....
$0003B0 89 94 A0 84 8F 85 93 8E 94 A0 97 8F 92 8B A0 95 .. ..... . .... .
$0003C0 8E 94 89 8C A0 99 8F 95 A0 94 92 99 A0 A0 A0 A0 .... ... ...
$0003D0 01 02 04 15 0C 27 13 20 0F 01 13 09 13 20 20 20 .....'. .....
$0003E0 20 20 20 20 20 20 20 20 20 20 28 36 31 39 29 20 (619)
$0003F0 33 34 31 2D 32 39 38 34 B5 8D C3 B5 4C A8 A6 8C 341-2984 5.C5L(&.
$000400 10 09 12 01 14 05 27 13 20 13 09 07 0E 01 14 15 ......'. .......
$000410 12 05 20 16 31 2E 30 20 20 20 20 20 36 2F 32 34 .. .1.0 6/24
$000420 2F 31 39 38 34 20 20 20 A0 A0 AA A0 82 85 94 94 /1984 * ....
$000430 85 92 A0 86 89 8C 85 A0 88 81 8E 84 8C 89 8E 87 .. .... ........
$000440 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000450 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000460 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000470 A0 A0 A0 A0 A0 A0 A0 A0 16 93 AA C9 A0 F0 2C AD ..*I p,-
$000480 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000490 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0004A0 20 20 20 20 20 20 20 20 A0 A0 AA A0 93 8F 95 8E * ....
$0004B0 84 A0 85 86 86 85 83 94 93 A0 81 8E 84 A0 8D 95 . ...... . ... ..
$0004C0 93 89 83 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 ...
$0004D0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0004E0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0004F0 A0 A0 A0 A0 A0 A0 A0 A0 04 A9 5D 0A A9 D0 93 AE .)].)P..
$000500 20 20 20 20 20 20 20 20 20 13 19 13 14 05 0D 20 ......
$000510 09 0E 06 0F 12 0D 01 14 09 0F 0E 20 20 20 20 20 ........ ...
$000520 20 20 20 20 20 20 20 20 A0 A0 AA A0 8D 81 8E 99 * ....
$000530 A0 94 85 98 94 A0 92 8F 95 94 89 8E 85 93 A0 85 .... .. ...... .
$000540 87 AE A0 90 93 95 85 84 8F AD 8D 8F 84 85 8D A0 .. ..... .-.....
$000550 A0 A0 AA A0 90 8C 85 81 93 85 A0 83 81 8C 8C A0 * .... .. ....
$000560 81 82 84 95 8C A7 93 A0 8F 81 93 89 93 A0 81 8E .....'. ..... ..
$000570 84 A0 8C 85 81 96 85 A0 27 9C 20 80 A1 4C 83 9F . ..... '. .!L..
$000580 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000590 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0005A0 20 20 20 20 20 20 20 20 A0 A0 AA A0 87 92 81 90 * ....
$0005B0 88 89 83 93 A0 92 8F 95 94 89 8E 85 93 A0 86 92 .... ... ..... ..
$0005C0 8F 8D BA A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 ..:
$0005D0 A0 A0 A0 A0 8D 85 A0 85 AD 8D 81 89 8C A0 86 8F .. . -.... ..
$0005E0 92 A0 81 8E 99 A0 8F 94 88 85 92 A0 93 95 87 87 . ... .. ... ....
$0005F0 85 93 94 89 8F 8E 93 A0 60 45 90 CF 38 60 06 44 ....... `E.O8`.D
$000600 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000610 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000620 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 94 88 ..
$000630 85 A0 87 92 81 90 88 89 83 93 A0 8D 81 87 89 83 . ...... .. .....
$000640 89 81 8E A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 ...
$000650 A0 A0 A0 A0 86 8F 92 A0 94 88 85 A0 8E 85 98 94 ... ... ....
$000660 A0 96 85 92 93 89 8F 8E AE A0 A0 A0 A0 A0 A0 A0 ....... .
$000670 A0 A0 A0 A0 A0 A0 A0 A0 60 A2 4C EA A2 A9 0C D0 `"Lj").P
$000680 90 8C 81 8E 93 A0 86 8F 92 A0 96 B1 AE B1 BA A0 ..... .. . .1.1:
$000690 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0006A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 94 92 ..
$0006B0 81 8E 93 89 94 89 8F 8E 93 A0 A0 A0 A0 A0 A0 A0 ........ .
$0006C0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0006D0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0006E0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0006F0 A0 A0 A0 A0 A0 A0 A0 A0 02 4C EA A2 20 AF A7 D0 .Lj" /'P
$000700 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000710 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000720 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 AA A0 8E 8F 96 81 * ....
$000730 94 89 8F 8E A0 81 90 90 8C 85 A0 83 81 94 A0 9D .... ... .. ... .
$000740 9B A0 92 8F 95 94 89 8E 85 93 BA A0 A0 A0 A0 A0 . ...... ..:
$000750 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000760 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000770 A0 A0 A0 A0 A0 A0 A0 A0 29 01 D0 06 8E 72 AA 8C ).P..r*.
$000780 A0 A0 AA A0 97 92 89 94 94 85 8E A0 89 8E A0 8D * .... ... .. .
$000790 81 83 88 89 8E 85 A0 8C 81 8E 87 95 81 87 85 A0 ...... . .......
$0007A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 96 8F ..
$0007B0 89 83 85 A0 81 8E 84 A0 93 8F 95 8E 84 A0 A0 A0 ... ... .....
$0007C0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0007D0 01 02 04 15 0C 27 13 20 0F 01 13 09 13 20 20 20 .....'. .....
$0007E0 20 20 20 20 20 20 20 20 20 20 28 36 31 39 29 20 (619)
$0007F0 33 34 31 2D 32 39 38 34 B5 8D C3 B5 4C A8 A6 8C 341-2984 5.C5L(&.
$000800 10 09 12 01 14 05 27 13 20 13 09 07 0E 01 14 15 ......'. .......
$000810 12 05 20 16 31 2E 30 20 20 20 20 20 36 2F 32 34 .. .1.0 6/24
$000820 2F 31 39 38 34 20 20 20 A0 A0 A0 A0 A0 A0 A0 A0 /1984
$000830 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000840 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000850 84 89 93 8B AE A0 99 8F 95 A0 97 89 8C 8C A0 8F ..... .. . .... .
$000860 83 83 81 93 89 8F 8E 81 8C 8C 99 A0 82 85 A0 81 ........ ... .. .
$000870 93 8B 85 84 A0 A0 A0 A0 17 93 AA C9 A0 F0 2E AD .... ..*I p.-
$000880 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000890 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0008A0 20 20 20 20 20 20 20 20 A0 A0 A0 94 88 85 A0 90 ... .
$0008B0 92 8F 87 92 81 8D A0 89 93 A0 90 92 85 94 94 99 ...... . . ......
$0008C0 A0 8D 95 83 88 A0 93 94 92 81 89 87 88 94 A0 A0 .... .. ......
$0008D0 89 86 A0 99 8F 95 A0 97 89 93 88 A0 94 8F A0 85 .. ... . ... .. .
$0008E0 98 89 94 A0 94 8F A0 82 81 93 89 83 AF 84 8F 93 ... .. . ..../...
$0008F0 AE A0 A0 94 88 89 93 A0 04 A9 5D 0A A9 D0 93 AE . .... .)].)P..
$000900 20 20 20 20 20 20 20 20 20 13 19 13 14 05 0D 20 ......
$000910 09 0E 06 0F 12 0D 01 14 09 0F 0E 20 20 20 20 20 ........ ...
$000920 20 20 20 20 20 20 20 20 86 8F 92 97 81 92 84 AE ........
$000930 A0 A0 8A 95 93 94 A0 81 8E 93 97 85 92 A0 81 8C .... . ..... ..
$000940 8C A0 94 88 85 A0 91 95 85 93 94 89 8F 8E 93 A0 . ... .. .......
$000950 89 93 A0 93 8F A0 99 8F 95 A0 83 81 8E A0 8D 81 .. .. .. . ... ..
$000960 8B 85 A0 81 8E 99 A0 8D 8F 84 89 86 89 83 81 94 .. ... . ........
$000970 89 8F 8E 93 A0 A0 A0 A0 27 9C 20 80 A1 4C 83 9F .... '. .!L..
$000980 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000990 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0009A0 20 20 20 20 20 20 20 20 81 8E 84 A0 8D 81 8B 85 ... ....
$0009B0 A0 93 95 92 85 A0 94 88 81 94 A0 99 8F 95 A0 88 .... .. .. ... .
$0009C0 81 96 85 A0 94 88 85 A0 A0 A0 A0 A0 A0 A0 A0 A0 ... ...
$0009D0 94 8F A0 84 8F 93 A0 94 88 81 94 A0 99 8F 95 A0 .. ... . ... ...
$0009E0 8D 89 87 88 94 A0 8E 85 85 84 AE A0 A0 8A 95 93 ..... .. ... ...
$0009F0 94 A0 A0 A0 A0 A0 A0 A0 60 45 90 CF 38 60 06 44 . `E.O8`.D
$000A00 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000A10 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000A20 A0 A0 A0 A0 A0 A0 A0 A0 83 8F 92 92 85 83 94 A0 .......
$000A30 84 89 93 8B A0 89 8E A0 84 92 89 96 85 A0 A3 B1 .... .. ..... #1
$000A40 AE A0 A0 94 8F A0 93 94 81 92 94 AC A0 A0 A0 A0 . .. .. ...,
$000A50 92 85 8D 85 8D 82 85 92 AC A0 89 86 A0 8D 99 A0 ........ , .. ..
$000A60 8C 8F 87 8F A0 89 93 A0 84 85 93 94 92 8F 99 85 .... .. ........
$000A70 84 AC A0 94 88 85 A0 A0 60 A2 4C EA A2 A9 0C D0 ., ... `"Lj").P
$000A80 BD AD BD AD BD AD BD AD BD AD BD AD BD A0 A0 A0 =-=-=-=- =-=-=
$000A90 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000AA0 A0 A0 A0 A0 A0 A0 A0 A0 81 8C 8C A0 99 8F 95 A0 ... ...
$000AB0 8D 95 93 94 A0 88 81 96 85 A0 90 92 85 90 81 92 .... ... . ......
$000AC0 85 84 A0 89 93 A0 81 A0 90 89 83 94 95 92 85 A0 .. .. . .......
$000AD0 90 92 8F 87 92 81 8D A0 97 89 8C 8C A0 8E 8F 94 ....... .... ...
$000AE0 A0 97 8F 92 8B AE A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 .....
$000AF0 A0 A0 A0 A0 A0 A0 A0 A0 02 4C EA A2 20 AF A7 D0 .Lj" /'P
$000B00 89 8E 93 94 92 95 83 94 89 8F 8E 93 BA A0 A0 A0 ........ ....:
$000B10 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000B20 A0 A0 A0 A0 A0 A0 A0 A0 93 81 96 85 84 A0 89 8E ..... ..
$000B30 A0 93 94 81 8E 84 81 92 84 A0 B3 B3 A0 8F 92 A0 ....... . 33 ..
$000B40 B3 B4 A0 93 85 83 94 8F 92 A0 86 8F 92 8D 81 94 34 ..... . ......
$000B50 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000B60 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000B70 A0 A0 A0 A0 A0 A0 A0 A0 29 01 D0 06 8E 72 AA 8C ).P..r*.
$000B80 AD BD AD BD AD BD AD BD AD BD AD BD AD A0 A0 A0 -=-=-=-= -=-=-
$000B90 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000BA0 A0 A0 A0 A0 A0 A0 A0 A0 94 88 85 A0 90 89 83 94 ... ....
$000BB0 95 92 85 A0 8D 95 93 94 A0 82 85 A0 90 8C 81 83 ... .... .. ....
$000BC0 85 84 A0 8F 8E A0 81 A0 A2 84 81 94 81 A2 A0 A0 .. .. . "...."
$000BD0 01 02 04 15 0C 27 13 20 0F 01 13 09 13 20 20 20 .....'. .....
$000BE0 20 20 20 20 20 20 20 20 20 20 28 36 31 39 29 20 (619)
$000BF0 33 34 31 2D 32 39 38 34 B5 8D C3 B5 4C A8 A6 8C 341-2984 5.C5L(&.
$000C00 10 09 12 01 14 05 27 13 20 13 09 07 0E 01 14 15 ......'. .......
$000C10 12 05 20 16 31 2E 30 20 20 20 20 20 36 2F 32 34 .. .1.0 6/24
$000C20 2F 31 39 38 34 20 20 20 A0 A0 A0 93 94 81 8E 84 /1984 .....
$000C30 81 92 84 A0 83 8F 8E 86 89 87 95 92 81 94 89 8F ... .... ........
$000C40 8E BF A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 .?
$000C50 89 86 A0 99 8F 95 A0 81 8E 93 97 85 92 A0 8E 8F .. ... . ..... ..
$000C60 AC A0 99 8F 95 A0 8D 81 99 A0 83 88 81 8E 87 85 , ... .. . ......
$000C70 A0 94 88 85 A0 A0 A0 A0 18 93 AA C9 A0 F0 30 AD ... ..*I p0-
$000C80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000C90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000CA0 20 20 20 20 20 20 20 20 A0 A0 A0 A0 A0 A0 A0 A0
$000CB0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000CC0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000CD0 82 8F 8F 94 A0 86 89 8C 85 A0 8E 81 8D 85 A0 81 .... ... . .... .
$000CE0 8E 84 A0 94 99 90 85 AE A0 A0 82 8F 8F 94 A0 86 .. ..... .... .
$000CF0 89 8C 85 A0 A0 A0 A0 A0 04 A9 5D 0A A9 D0 93 AE ... .)].)P..
$000D00 20 20 20 20 20 20 20 20 20 13 19 13 14 05 0D 20 ......
$000D10 09 0E 06 0F 12 0D 01 14 09 0F 0E 20 20 20 20 20 ........ ...
$000D20 20 20 20 20 20 20 20 20 89 86 A0 99 8F 95 A0 81 .. ... .
$000D30 8E 93 97 85 92 A0 99 85 93 AC A0 99 8F 95 A0 82 ..... .. ., ... .
$000D40 8F 8F 94 A0 90 92 8F 87 92 81 8D A0 A0 A0 A0 A0 ... .... ...
$000D50 94 99 90 85 A0 83 81 8E A0 82 85 BA A0 81 90 90 .... ... ..: ...
$000D60 8C 85 93 8F 86 94 AC A0 82 89 8E 81 92 99 AC A0 ......, ......,
$000D70 8F 92 A0 A0 A0 A0 A0 A0 27 9C 20 80 A1 4C 83 9F .. '. .!L..
$000D80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000D90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000DA0 20 20 20 20 20 20 20 20 97 89 8C 8C A0 82 85 A0 .... ..
$000DB0 81 8E A0 81 90 90 8C 85 93 8F 86 94 A0 90 92 8F .. ..... .... ...
$000DC0 87 92 81 8D A0 83 81 8C 8C 85 84 A0 A0 A0 A0 A0 .... ... ...
$000DD0 94 85 98 94 AE A0 A0 99 8F 95 A0 8D 81 99 A0 94 ..... . .. ... .
$000DE0 88 85 8E A0 83 88 81 8E 87 85 A0 94 88 85 A0 88 ... .... .. ... .
$000DF0 89 8D 85 8D A0 A0 A0 A0 60 45 90 CF 38 60 06 44 .... `E.O8`.D
$000E00 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000E10 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000E20 A0 A0 A0 A0 A0 A0 A0 A0 A2 88 85 8C 8C 8F A2 AE ".....".
$000E30 A0 A0 94 88 85 92 85 A0 97 89 8C 8C A0 82 85 A0 ..... .... ..
$000E40 8E 8F A0 92 8F 8F 8D A0 86 8F 92 A0 A0 A0 A0 A0 .. .... ...
$000E50 94 8F A0 81 8C 8C 8F 97 A0 86 8F 92 A0 99 8F 95 .. ..... ... ...
$000E60 92 A0 8F 97 8E A0 92 8F 95 94 89 8E 85 93 AE A0 . ... .. .......
$000E70 A0 A0 A0 A0 A0 A0 A0 A0 60 A2 4C EA A2 A9 0C D0 `"Lj").P
$000E80 81 94 A0 94 88 85 A0 8C 81 93 94 A0 93 94 81 87 .. ... . ... ....
$000E90 85 93 A0 8F 86 A0 94 88 85 A0 90 92 8F 87 92 81 .. .. .. . ......
$000EA0 8D AC A0 A0 A0 A0 A0 A0 81 8E 99 A0 8F 94 88 85 ., ... ....
$000EB0 92 A0 92 8F 95 94 89 8E 85 93 A0 8F 86 A0 99 8F . ...... .. .. ..
$000EC0 95 92 A0 8F 97 8E AC A0 93 95 83 88 A0 A0 A0 A0 .. ..., ....
$000ED0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000EE0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000EF0 A0 A0 A0 A0 A0 A0 A0 A0 02 4C EA A2 20 AF A7 D0 .Lj" /'P
$000F00 89 94 A0 97 89 8C 8C A0 90 92 8F 8D 90 94 A0 99 .. .... ...... .
$000F10 8F 95 A0 97 89 94 88 BA A0 A0 A0 A0 A0 A0 A0 A0 .. ....:
$000F20 A0 A0 A0 A0 A0 A0 A0 A0 81 93 A0 93 8F 95 8E 84 .. .....
$000F30 A0 92 8F 95 94 89 8E 85 93 AE A0 A0 A0 A0 A0 A0 ....... ..
$000F40 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000F50 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000F60 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000F70 A0 A0 A0 A0 A0 A0 A0 A0 29 01 D0 06 8E 72 AA 8C ).P..r*.
$000F80 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000F90 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000FA0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000FB0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000FC0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000FD0 01 02 04 15 0C 27 13 20 0F 01 13 09 13 20 20 20 .....'. .....
$000FE0 20 20 20 20 20 20 20 20 20 20 28 36 31 39 29 20 (619)
$000FF0 33 34 31 2D 32 39 38 34 B5 8D C3 B5 4C A8 A6 8C 341-2984 5.C5L(&.
$001000 10 09 12 01 14 05 27 13 20 13 09 07 0E 01 14 15 ......'. .......
$001010 12 05 20 16 31 2E 30 20 20 20 20 20 36 2F 32 34 .. .1.0 6/24
$001020 2F 31 39 38 34 20 20 20 94 8F A0 B1 B5 B5 AC A0 /1984 .. 155,
$001030 99 8F 95 A0 97 89 8C 8C A0 88 81 96 85 A0 B2 B5 ... .... .... 25
$001040 B6 A0 82 99 94 85 93 A0 86 8F 92 A0 A0 A0 A0 A0 6 ..... ...
$001050 99 8F 95 92 A0 92 8F 95 94 89 8E 85 93 A0 95 90 .... ... ..... ..
$001060 AE A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 .
$001070 A0 A0 A0 A0 A0 A0 A0 A0 19 93 AA C9 A0 F0 32 AD ..*I p2-
$001080 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$001090 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0010A0 20 20 20 20 20 20 20 20 99 8F 95 92 A0 8F 97 8E .... ...
$0010B0 A0 92 8F 95 94 89 8E 85 93 A0 93 94 81 92 94 89 ....... . ......
$0010C0 8E 87 A0 81 94 BA A0 A4 B9 82 B0 B0 A0 A0 A0 A0 .. ..: $ 9.00
$0010D0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0010E0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0010F0 A0 A0 A0 A0 A0 A0 A0 A0 04 A9 5D 0A A9 D0 93 AE .)].)P..
$001100 20 20 20 20 20 20 20 20 20 13 19 13 14 05 0D 20 ......
$001110 09 0E 06 0F 12 0D 01 14 09 0F 0E 20 20 20 20 20 ........ ...
$001120 20 20 20 20 20 20 20 20 81 A0 83 88 81 8E 87 85 . ......
$001130 A0 94 8F A0 B1 B5 B4 A0 97 8F 95 8C 84 A0 87 89 .. 154 ..... ..
$001140 96 85 A0 99 8F 95 A0 B5 B1 B2 A0 A0 A0 A0 A0 A0 .. ... 5 12
$001150 94 88 85 A0 8E 85 98 94 A0 96 85 92 93 89 8F 8E ... .... .......
$001160 A0 8F 86 A0 90 89 92 81 94 85 A7 93 A0 93 89 87 .. .... ..'. ...
$001170 8E 81 94 95 92 85 A0 A0 27 9C 20 80 A1 4C 83 9F ...... '. .!L..
$001180 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$001190 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0011A0 20 20 20 20 20 20 20 20 86 92 85 85 A0 82 99 94 .... ...
$0011B0 85 93 A0 93 94 81 92 94 89 8E 87 A0 81 94 BA A0 .. ..... ... ..:
$0011C0 A4 B9 81 B0 B0 AE A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 $9.00.
$0011D0 97 89 8C 8C A0 88 81 8E 84 8C 85 A0 81 8C 8C A0 .... ... ... ...
$0011E0 8F 86 A0 94 88 89 93 AC A0 93 8F A0 99 8F 95 A0 .. ...., .. ...
$0011F0 97 89 8C 8C A0 A0 A0 A0 60 45 90 CF 38 60 06 44 .... `E.O8`.D
$001200 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001210 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001220 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001230 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001240 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001250 8E 8F 94 A0 88 81 96 85 A0 94 8F A0 8D 81 8B 85 ... .... .. ....
$001260 A0 99 8F 95 92 A0 8F 97 8E A0 92 8F 95 94 89 8E .... .. . ......
$001270 85 93 AE A0 A0 A0 A0 A0 60 A2 4C EA A2 A9 0C D0 ... `"Lj").P
$001280 93 94 81 8E 84 81 92 84 A0 88 89 8D 85 8D A0 89 ........ ..... .
$001290 93 A0 94 88 85 A0 83 8F 8E 93 94 81 8E 94 A0 B1 . ... .. ...... 1
$0012A0 B5 B6 AE A0 A0 A0 A0 A0 94 8F A0 89 8E 83 8C 95 56. .. .....
$0012B0 84 85 A0 99 8F 95 92 A0 92 8F 95 94 89 8E 85 93 .. .... ........
$0012C0 A0 89 8E 94 8F A0 94 88 85 A0 A0 A0 A0 A0 A0 A0 .... .. .
$0012D0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0012E0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0012F0 A0 A0 A0 A0 A0 A0 A0 A0 02 4C EA A2 20 AF A7 D0 .Lj" /'P
$001300 94 8F A0 81 8C 8C 8F 97 A0 86 8F 92 A0 8D 8F 92 .. ..... ... ...
$001310 85 A0 92 8F 8F 8D AC A0 84 85 83 92 85 81 93 85 . ...., ........
$001320 A0 94 88 89 93 A0 A0 A0 82 8F 8F 94 A0 93 94 92 .... .... ...
$001330 81 90 AC A0 99 8F 95 A0 8D 95 93 94 A0 8D 8F 84 .., ... .... ...
$001340 89 86 99 A0 94 88 85 A0 A0 A0 A0 A0 A0 A0 A0 A0 ... ...
$001350 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001360 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001370 A0 A0 A0 A0 A0 A0 A0 A0 29 01 D0 06 8E 72 AA 8C ).P..r*.
$001380 96 81 8C 95 85 AE A0 A0 89 86 A0 99 8F 95 A0 84 ...... .. ... .
$001390 85 83 92 85 81 93 85 A0 94 88 89 93 A0 96 81 8C ....... .... ...
$0013A0 95 85 A0 A0 A0 A0 A0 A0 90 92 8F 87 92 81 8D A0 .. .......
$0013B0 8C 8F 83 81 94 85 84 A0 81 94 A0 A4 B9 83 B0 B0 ....... .. $9.00
$0013C0 A0 94 8F A0 83 81 8C 8C A0 A0 A0 A0 A0 A0 A0 A0 .. ....
$0013D0 01 02 04 15 0C 27 13 20 0F 01 13 09 13 20 20 20 .....'. .....
$0013E0 20 20 20 20 20 20 20 20 20 20 28 36 31 39 29 20 (619)
$0013F0 33 34 31 2D 32 39 38 34 B5 8D C3 B5 4C A8 A6 8C 341-2984 5.C5L(&.
$001400 10 09 12 01 14 05 27 13 20 13 09 07 0E 01 14 15 ......'. .......
$001410 12 05 20 16 31 2E 30 20 20 20 20 20 36 2F 32 34 .. .1.0 6/24
$001420 2F 31 39 38 34 20 20 20 A0 A0 A0 A0 A0 A0 A0 A0 /1984
$001430 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001440 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001450 90 AE 8F AE A0 82 8F 98 A0 B9 B0 B7 B7 A0 A0 A0 .... ... 9077
$001460 A0 A0 A0 A0 A0 8F 8E 8C 99 A0 A4 B2 B0 B0 A0 8D ... . $200 .
$001470 8F 92 85 A0 94 8F A0 A0 1A 93 AA C9 A0 F0 34 AD ... .. ..*I p4-
$001480 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$001490 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0014A0 20 20 20 20 20 20 20 20 88 85 99 A1 A0 A0 81 8E ...! ..
$0014B0 99 A0 83 8C 95 82 93 A0 8E 85 85 84 A0 81 A0 8E . ..... .... . .
$0014C0 85 97 A0 8D 85 8D 82 85 92 A1 BF A1 BF A1 A0 A0 .. ..... .!?!?!
$0014D0 90 81 8C 8D A0 93 90 92 89 8E 87 93 AC A0 83 81 .... ... ...., ..
$0014E0 AE A0 A0 A0 A0 87 85 94 A0 94 88 85 A0 83 8F 92 . ... ... ...
$0014F0 96 95 93 A0 A0 A0 A0 A0 04 A9 5D 0A A9 D0 93 AE ... .)].)P..
$001500 20 20 20 20 20 20 20 20 20 13 19 13 14 05 0D 20 ......
$001510 09 0E 06 0F 12 0D 01 14 09 0F 0E 20 20 20 20 20 ........ ...
$001520 20 20 20 20 20 20 20 20 A0 A0 A0 A0 A0 A0 A0 A0
$001530 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001540 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001550 A0 A0 A0 A0 A0 A0 A0 B9 B2 B2 B6 B3 A0 A0 A0 A0 9 2263
$001560 A0 A0 A0 A0 A0 B1 B1 AD 8D 85 87 A0 88 81 92 84 11- ... ....
$001570 A0 84 92 89 96 85 A1 A1 27 9C 20 80 A1 4C 83 9F .....!! '. .!L..
$001580 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$001590 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0015A0 20 20 20 20 20 20 20 20 81 93 93 85 8D 82 8C 99 ........
$0015B0 A0 8C 81 8E 87 95 81 87 85 A0 89 93 A0 8D 99 A0 ....... . .. ..
$0015C0 87 81 8D 85 AC A0 82 95 94 A0 89 A7 8D A0 A0 A0 ...., .. . .'.
$0015D0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0015E0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0015F0 A0 A0 A0 A0 A0 A0 A0 A0 60 45 90 CF 38 60 06 44 `E.O8`.D
$001600 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001610 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001620 A0 A0 A0 A0 A0 A0 A0 A0 94 8F 8F A0 86 95 83 8B ... ....
$001630 89 8E 87 A0 8C 81 9A 99 A0 94 8F A0 88 81 96 85 ... .... .. ....
$001640 A0 97 92 89 94 94 85 8E A0 94 88 89 93 A0 A0 A0 ....... ....
$001650 83 8C 95 82 93 A1 A1 A1 A1 A1 A1 A0 A0 A0 89 A0 .....!!! !!! .
$001660 8E 85 85 84 A0 94 8F A0 8A 8F 89 8E A0 81 A0 87 .... .. .... . .
$001670 8F 8F 84 A0 8F 8E 85 A1 60 A2 4C EA A2 A9 0C D0 ... ...! `"Lj").P
$001680 A0 A0 A0 A0 A0 A0 A0 A0 A0 90 89 92 81 94 85 A7 ......'
$001690 93 A0 93 89 87 8E 81 94 95 92 85 A0 A0 A0 A0 A0 . ...... ...
$0016A0 A0 A0 A0 A0 A0 A0 A0 A0 90 92 8F 87 92 81 8D A0 .......
$0016B0 89 8E A0 89 94 AE A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 .. ...
$0016C0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0016D0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0016E0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0016F0 A0 A0 A0 A0 A0 A0 A0 A0 02 4C EA A2 20 AF A7 D0 .Lj" /'P
$001700 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 97 92 89 94 ....
$001710 94 85 8E A0 82 99 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 ... ..
$001720 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001730 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001740 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001750 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001760 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001770 A0 A0 A0 A0 A0 A0 A0 A0 29 01 D0 06 8E 72 AA 8C ).P..r*.
$001780 A0 A0 A0 A0 A0 A0 A0 A0 A0 8A 8F 88 8E 8E 85 99 .......
$001790 A0 81 90 90 8C 85 93 85 85 84 A0 A0 A0 A0 A0 A0 ....... ..
$0017A0 A0 A0 A0 A0 A0 A0 A0 A0 81 82 84 95 8C A7 93 A0 .....'.
$0017B0 8F 81 93 89 93 A0 A0 A0 A0 A0 A0 A0 A0 83 95 92 ..... ...
$0017C0 92 85 8E 94 8C 99 A0 B2 A0 84 92 89 96 85 93 A0 ...... 2 ......
$0017D0 01 02 04 15 0C 27 13 20 0F 01 13 09 13 20 20 20 .....'. .....
$0017E0 20 20 20 20 20 20 20 20 20 20 28 36 31 39 29 20 (619)
$0017F0 33 34 31 2D 32 39 38 34 B5 8D C3 B5 4C A8 A6 8C 341-2984 5.C5L(&.
** END **
Text found in Pirates_Signature_v1.0_1984_Johnney_Appleseed.do/DISPLAYER.txt:
Offset Hex Data Characters
======= ================================================ =================
$000000 A2 00 86 06 A0 00 B1 06 99 00 04 C8 C0 00 D0 F6 "... .1. ...H@.Pv
$000010 E8 E6 07 EE 0A 03 E0 04 D0 EC 8E 0A 03 60 .. .. hf.n..`. Pl...`
** END **
Text found in Pirates_Signature_v1.0_1984_Johnney_Appleseed.do/DOC.HELP.txt:
Offset Hex Data Characters
======= ================================================ =================
$000000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000010 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000020 20 20 20 20 20 20 20 20 20 A0 A0 A0 90 92 85 93 ....
$000030 93 BA A0 83 94 92 8C AD 97 A0 86 8F 92 A0 89 8E .: ....- . ... ..
$000040 93 94 92 95 83 94 89 8F 8E 93 A0 A0 A0 A0 A0 20 ........ ..
$000050 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000060 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000070 A0 A0 A0 A0 A0 A0 A0 20 09 93 AA C9 A0 F0 12 AD ..*I p.-
$000080 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000090 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0000A0 A0 A0 A0 A0 A0 A0 A0 20 20 A0 A0 A0 A0 A0 A0 A0
$0000B0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0000C0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 20
$0000D0 20 A0 A0 A0 A0 A0 A0 A0 83 8F 8D 8D 89 8E 87 A0 .......
$0000E0 93 8F 8F 8E BA A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 ....:
$0000F0 A0 A0 A0 A0 A0 A0 A0 20 04 A9 5D 0A A9 D0 93 AE .)].)P..
$000100 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 14 05 18 14 A0 ....
$000110 13 03 12 05 05 0E A0 02 15 09 0C 04 05 12 A0 A0 ...... . ......
$000120 A0 A0 A0 A0 A0 A0 A0 20 20 A0 A0 A0 A0 A0 A0 A0
$000130 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000140 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 20
$000150 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000160 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000170 A0 A0 A0 A0 A0 A0 A0 20 25 9C 20 80 A1 4C 83 9F %. .!L..
$000180 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 82 99 BA A0 8A 8F ..: ..
$000190 88 8E 8E 85 99 A0 81 90 90 8C 85 93 85 85 84 A0 ..... .. .......
$0001A0 A0 A0 A0 A0 A0 A0 A0 20 20 A0 A0 A0 A0 A0 A0 A0
$0001B0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0001C0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 20
$0001D0 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0001E0 A0 A0 A0 A0 A0 A0 B3 B0 A0 8D 85 87 A0 84 92 89 30 ... ...
$0001F0 96 85 BF A0 A0 A0 A0 20 60 45 90 CF 38 60 06 44 ..? `E.O8`.D
$000200 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000210 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000220 A0 A0 A0 A0 A0 A0 A0 20 20 A0 A0 A0 A0 A0 A0 A0
$000230 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000240 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 20
$000250 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000260 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000270 A0 A0 A0 A0 A0 A0 A0 20 60 A2 4C EA A2 A9 0C D0 `"Lj").P
$000280 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000290 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0002A0 20 20 20 20 20 20 20 20 20 A0 A0 A0 A0 A0 A0 A0
$0002B0 A0 A0 A0 A0 A0 81 82 84 95 8C A7 93 A0 8F 81 93 ... ..'. ...
$0002C0 89 93 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 20 ..
$0002D0 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0002E0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0002F0 A0 A0 A0 A0 A0 A0 A0 20 02 4C EA A2 20 AF A7 D0 .Lj" /'P
$000300 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000310 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000320 A0 A0 A0 A0 A0 A0 A0 20 20 A0 A0 A0 A0 A0 A0 A0
$000330 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000340 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 20
$000350 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000360 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000370 A0 A0 A0 A0 A0 A0 A0 20 29 01 D0 06 8E 72 AA 8C ).P..r*.
$000380 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000390 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0003A0 A0 A0 A0 A0 A0 A0 A0 20 20 A0 A0 8F 8E 8C 89 8E .....
$0003B0 85 A0 B2 B4 A0 88 92 93 AF 84 81 99 A0 A0 B7 A0 . 24 ... /... 7
$0003C0 84 81 99 93 AF 97 85 85 8B A0 A0 A0 A0 A0 A0 20 ..../... .
$0003D0 20 01 02 04 15 0C 27 13 20 0F 01 13 09 13 2E 2E .....'. .......
$0003E0 2E 2E 2E 2E 2E 2E 2E 2E 2E 28 36 31 39 29 20 33 ........ .(619) 3
$0003F0 34 31 2D 32 39 38 34 20 B5 8D C3 B5 4C A8 A6 8C 41-2984 5.C5L(&.
$000400 83 8F 8D 8D 81 8E 84 93 A0 86 8F 92 A0 90 81 87 ........ ... ...
$000410 85 A0 85 84 89 94 8F 92 A0 A8 83 94 92 8C AD 83 . ...... (....-.
$000420 88 81 92 93 A9 A0 A0 A0 20 A0 A0 A0 A0 A0 8B A0 ....) .
$000430 AD A0 8B 89 8C 8C A0 83 95 92 85 8E 94 A0 8C 89 - .... . ..... ..
$000440 8E 85 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 20 ..
$000450 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000460 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000470 A0 A0 A0 A0 A0 A0 A0 20 1E 93 AA C9 A0 F0 3C AD ..*I p<-
$000480 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000490 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0004A0 20 20 20 20 20 20 20 20 20 A0 A0 A0 A0 A0 8C A0 .
$0004B0 AD A0 93 83 92 8F 8C 8C A0 8C 85 86 94 A0 A0 A0 - ...... ....
$0004C0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 20
$0004D0 20 A0 A0 A0 A0 A0 83 94 92 8C AD 93 88 89 86 94 .. ..-.....
$0004E0 AD 8D A0 BD A0 9B A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 -. = .
$0004F0 A0 A0 A0 A0 A0 A0 A0 20 04 A9 5D 0A A9 D0 93 AE .)].)P..
$000500 20 A0 A0 A0 A0 A0 81 A0 AD A0 95 90 A0 A0 A0 A0 . - ..
$000510 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000520 A0 A0 A0 A0 A0 A0 A0 20 20 A0 A0 A0 A0 A0 8F A0 .
$000530 AD A0 93 83 92 8F 8C 8C A0 95 90 A0 A0 A0 A0 A0 - ...... ..
$000540 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 20
$000550 20 A0 A0 A0 A0 A0 83 94 92 8C AD 93 88 89 86 94 .. ..-.....
$000560 AD 8E A0 BD A0 9C A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 -. = .
$000570 A0 A0 A0 A0 A0 A0 A0 20 27 9C 20 80 A1 4C 83 9F '. .!L..
$000580 20 A0 A0 A0 A0 A0 82 A0 AD A0 87 8F A0 94 8F A0 . - .. ..
$000590 82 8F 94 94 8F 8D A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 ......
$0005A0 A0 A0 A0 A0 A0 A0 A0 20 20 A0 A0 A0 A0 A0 90 A0 .
$0005B0 AD A0 93 83 92 8F 8C 8C A0 84 8F 97 8E A0 A0 A0 - ...... ....
$0005C0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 20
$0005D0 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0005E0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0005F0 A0 A0 A0 A0 A0 A0 A0 20 60 45 90 CF 38 60 06 44 `E.O8`.D
$000600 20 A0 A0 A0 A0 A0 83 A0 AD A0 87 8F A0 94 8F A0 . - .. ..
$000610 83 85 8E 94 85 92 A0 8F 86 A0 8C 89 8E 85 A0 A0 ...... . . ....
$000620 A0 A0 A0 A0 A0 A0 A0 20 20 A0 A0 A0 A0 A0 92 A0 .
$000630 AD A0 93 83 92 8F 8C 8C A0 92 89 87 88 94 A0 A0 - ...... .....
$000640 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 20
$000650 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000660 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000670 20 20 20 20 20 20 20 20 60 A2 4C EA A2 A9 0C D0 `"Lj").P
$000680 20 A0 A0 A0 A0 A0 84 A0 AD A0 84 85 8C 85 94 85 . - ......
$000690 A0 83 88 81 92 81 83 94 85 92 A0 A0 A0 A0 A0 A0 ....... ..
$0006A0 A0 A0 A0 A0 A0 A0 A0 20 20 A0 A0 A0 A0 A0 94 A0 .
$0006B0 AD A0 87 8F A0 94 8F A0 94 8F 90 A0 A0 A0 A0 A0 - .. .. ...
$0006C0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 20
$0006D0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0006E0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0006F0 A0 A0 A0 A0 A0 A0 A0 A0 02 4C EA A2 20 AF A7 D0 .Lj" /'P
$000700 20 A0 A0 A0 A0 A0 87 A0 AD A0 95 8E 84 85 92 8C . - ......
$000710 89 8E 85 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 ...
$000720 A0 A0 A0 A0 A0 A0 A0 20 20 A0 A0 A0 A0 A0 97 A0 .
$000730 AD A0 94 88 89 93 A0 93 83 92 85 85 8E A0 A0 A0 - .... . .....
$000740 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 20
$000750 90 92 85 93 93 A0 81 8E 99 A0 8B 85 99 A0 94 8F ..... .. . ... ..
$000760 A0 92 85 94 95 92 8E A0 94 8F A0 99 8F 95 92 A0 ...... .. ....
$000770 83 95 92 92 85 8E 94 A0 29 01 D0 06 8E 72 AA 8C ....... ).P..r*.
$000780 20 A0 A0 A0 A0 A0 89 A0 AD A0 89 8E 93 85 92 94 . - ......
$000790 A0 93 90 81 83 85 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 .....
$0007A0 A0 A0 A0 A0 A0 A0 A0 20 20 A0 A0 A0 A0 A0 98 A0 .
$0007B0 AD A0 85 A8 98 A9 89 94 A0 94 8F A0 8D 85 8E 95 - .(.).. .. ....
$0007C0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 20
$0007D0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 AD 94 -.
$0007E0 85 98 94 A0 90 81 87 85 AD A0 A0 A0 A0 A0 A0 A0 ... .... -
$0007F0 A0 A0 A0 A0 A0 A0 A0 A0 B5 8D C3 B5 4C A8 A6 8C 5.C5L(&.
** END **
Text found in Pirates_Signature_v1.0_1984_Johnney_Appleseed.do/DRAW INST.bas:
10 TEXT : HOME : SPEED= 255
20 INPUT "DO YOU HAVE A PRINTER? ";A$: IF LEFT$(A$,1) < >"Y" THEN 90
30 PRINT : PRINT "GOOD... THEN SET IT UP PLEASE. WHEN YOU ARE FINISHED, ENTER THE SLOT NUMBER AND WE'LL GET STARTED.": INPUT "ENTER SLOT #: ";S
40 IF S <0 OR S >7 THEN 20
50 PR# S
90 HOME : HTAB 11: INVERSE : PRINT "DRAW INSTRUCTIONS"
95 NORMAL
100 VTAB 7: HTAB 6: PRINT "BY MICHAEL "; CHR$(34);"TWO SHEDS"; CHR$(34);" FINK"
110 GOSUB 5000
120 PRINT "WITH ADDITIONAL MATERIAL BY:"
130 PRINT : PRINT "EAGLE I. BERNS (FILL-IN PROGRAM)"
140 PRINT "KEN HALEY (PICTURE PACK & UNPACK)"
150 PRINT "EDWARD C. SO (HIRES FULL SCROLL)"
160 GOSUB 5000
170 PRINT " DRAW IS THE GRAPHICS UTILITY WHICH ALLOWS YOU TO DRAW ANYTHING ANYWHERE ON": PRINT "THE HGR2 SCREEN IN ANY OF THE 46 COLORS AVAILABLE. DRAW CIRCLES, LINES, LETTERS,"
180 PRINT "CHARACTERS, AND ANYTHING ELSE THAT MAY COME TO MIND.": PRINT " THE ONLY THING IS THAT IT TAKES SOME PRACTICE AND GETTING USED TO."
190 GOSUB 5000
200 PRINT " TO START WITH, THE PROGRAM WILL ASK YOU IF YOU WOULD LIKE TO CONTINUE": PRINT "DRAWING ON ANOTHER PICTURE THAT YOU PREVIOUSLY SAVED TO THE DISK. IF YOU": PRINT "WISH, YOU MAY LOAD ONE OF THE PICTURES I HAVE ALREADY DRAWN FOR YOU."
205 GOSUB 5000
210 PRINT " TO START WITH A CLEAR SCREEN, PRESS FOR ERASE. THIS WILL CLEAR THE": PRINT "SCREEN AT ANY TIME IN THE PROGRAM, PUT THE CURSOR AT (0,0), AND CHANGE YOUR": PRINT "COLOR TO WHITE (HCOLOR=3)."
220 GOSUB 5000
230 PRINT " TO MOVE UP, DOWN, LEFT, AND RIGHT, PRESS THE I,M,J, AND K KEYS RESPEC-": PRINT "TIVELY. THIS WILL MOVE THE CURSOR ONE DOT IN YOUR DESIRED DIRECTION.": PRINT " PRESS U,N,O, AND COMMA TO MOVE IN THE CORRESPONDING DIAGONAL DIRECTIONS."
240 GOSUB 5000
250 PRINT " TO DRAW A LITTLE FASTER, TYPE FOR REPEAT. INSTEAD OF ONE DOT AT A": PRINT "TIME, THE COMPUTER WILL AUTOMATICALLY DRAW A CONTINUOUS LINE."
260 PRINT "EACH TIME YOU PRESS , IT WILL DRAW A LITTLE BIT FASTER. PRESS TO": PRINT "EXIT REPEAT MODE. NOW YOU'RE BACK TO DRAWING ONE DOT AT A TIME. TA-DA!"
270 PRINT " DON'T WORRY ABOUT GOING OFF THE SCREEN BECAUSE DRAW IS EQUIPPED WITH A": PRINT "WRAP-AROUND FEATURE.": GOSUB 5000
280 PRINT " IF YOU WANT TO GO FROM ONE PLACE TO ANOTHER WITHOUT DRAWING ANYTHING, PRESS": PRINT " AND ENTER YOUR NEW COORDINATES. (0,0) IS THE TOP LEFT OF THE SCREEN"
290 PRINT " AND (279,191) IS THE LOWER RIGHT.": GOSUB 5000
300 PRINT " TO CHANGE THE COLOR THAT YOU ARE DRAWING WITH, TYPE AND A NUMBER FROM";: PRINT "ZERO TO SEVEN (0-7). THE FOLLOWING ARE THE HIRES COLORS:"
310 PRINT : PRINT " 0)...BLACK 1": PRINT " 1)...GREEN": PRINT " 2)...VIOLET": PRINT " 3)...WHITE 1": PRINT " 4)...BLACK 2": PRINT " 5)...ORANGE": PRINT " 6)...BLUE": PRINT " 7)...WHITE 2"
320 PRINT : PRINT " TO CHANGE THE BACKGROUND COLOR, TYPE AND A NUMBER 0-7."
330 GOSUB 5000
340 PRINT " LUCKILY FOR YOU, DRAW IS EQUIPPED WITH TWO SEPARATE CURSORS. TO SWITCH": PRINT "FROM ONE CURSOR TO THE OTHER, TYPE .": PRINT "PRESS > TO DRAW A LINE BETWEEN THEM."
350 GOSUB 5000
360 PRINT " NOW THAT YOU'RE WELL INTO DRAWING A MASTERPIECE AND A HALF, AND BEFORE THE": PRINT "POWER GOES OUT, YOU MIGHT WANT TO SAVE YOUR PICTURE ON YOUR DISK. OR PERHAPS"
370 PRINT "YOU ARE SO SICK OF THIS PROGRAM THAT YOU JUST CAN'T STAND IT ANY LONGER. JUST";: PRINT "PRESS FOR STOP/SAVE. IT WILL ASK YOU IF YOU WANT TO SAVE YOUR PICTURE."
380 PRINT "GIVE IT A NAME AND THEN SPECIFY IF YOU WANT IT PACKED OR NOT.": PRINT : PRINT "BUT WHAT DOES PACKING DO?": GOSUB 5000
390 PRINT " PACKING IS A PROCEDURE WHICH SAVES ON DISK SPACE. THE ONLY DRAWBACK IS THAT";: PRINT "YOU HAVE TO 'BRUN UNPACK' AFTER YOU HAVE 'BLOADED' YOUR PICTURE. 'UNPACK' IS";
400 PRINT "INCLUDED ON THE DRAW DISK.": GOSUB 5000
410 PRINT " PRESS FOR A KALEIDESCOPE EFFECT.WHENEVER YOU MOVE THE CURSOR, THREE": PRINT "OTHER CURSORS WILL BE DRAWING THE SAME THING IN THE THREE OTHER CORNERS OF THE"
420 PRINT "SCREEN. IF YOU DON'T UNDERSTAND, EXPERIMENT. PRESS AGAIN TO EXIT THE SYMMETRY MODE."
430 GOSUB 5000
440 PRINT " THE AND KEYS DEFINE THE DIAGONAL POINTS OF A RECTANGLE. PRESS": PRINT "EITHER OR AND YOUR CURSOR'S POSITION IS NOW REMEMBERED AS A CORNER"
450 PRINT "OF THE RECTANGLE. FOR EXAMPLE:"
460 PRINT : PRINT " D .----------.": PRINT " ! !": PRINT " ! !": PRINT " !----------.F"
470 PRINT : PRINT " NOW PRESS AND IT WILL DRAW THE ACTUAL RECTANGLE. PRESS AND THE": PRINT "COMPUTER WILL FILL IN THE RECTANGLE. WITH WHATEVER COLOR YOU WERE DRAWING."
480 PRINT " THE PROGRAM BEGINS WITH POINT 'D' AT (0,0) AND POINT 'F' AT (279,191).": GOSUB 5000
490 PRINT " PRESS AND YOU CAN NOW SCROLL EVERYTHING IN THE PREVIOUSLY": PRINT "DEFINED D.F. RECTANGLE."
500 PRINT " TO SCROLL IT UP, DOWN, LEFT, AND RIGHT, PRESS I,M,J, AND K KEYS RESPEC-": PRINT "TIVELY. TO EXIT SCROLL MODE TYPE AGAIN."
510 GOSUB 5000
520 PRINT " POSITION THE CURSOR INSIDE A SHAPE. NOW PRESS AND YOU CAN NOW FILL IN THE SHAPE WITH ANY OF 46 COLORS."
530 PRINT "THE COMPUTER WILL ASK YOU TO PRESS A KEY TO SEE A PAGE OF 23 COLORS. TO FLIP": PRINT "BETWEEN THE TWO PAGES OF COLORS, PRESS . WHEN YOU SEE A COLOR THAT YOU"
540 PRINT "LIKE, PRESS THE SPACE BAR AND THE ENTER ITS CORRESPONDING NUMBER (WHICH IS ": PRINT "CONVENIENTLY LISTED BESIDE THE COLOR). WHEN YOU SEE THE RESULT (OR LACK THERE-"
550 PRINT "OF), DECIDE WHETHER OR NOT YOU'D LIKE TO KEEP THE DRAWING THAT WAY. PRESS THE": PRINT "SPACE BAR AND ENTER YOUR DECISION. SHOULD YOU DECIDE THAT YOU DID NOT LIKE"
560 PRINT "THE RESULT, THE COMPUTER WILL ERASE WHAT IT JUST FILLED IN. NOW IT'S GOOD": PRINT "AS NEW!"
570 GOSUB 5000
580 PRINT " FOR YOU SPACE BUFFS PRESS
FOR A RANDOM STAR FIELD.": GOSUB 5000
590 PRINT " IF YOU HAVE THE DOS TOOLKIT HANDY, YOU CAN USE ITS CHARACTER SETS IN THE": PRINT "DRAW PROGRAM. PRESS FOR CAPITALLETTERS AND FOR SMALL LETTERS."
600 PRINT " WHILE YOU'RE IN A CHARACTER MODE YOUCAN PRESS FOR INVERSE, ";: PRINT "FOR NORMAL, FOR RANDOW SCRATCH MARKS (CAPITAL FUNCTION ONLY HANDY FOR"
610 PRINT "EXPLOSION AND ROCK DRAWING), TO POSITION CURSOR, THE ARROW": PRINT "KEYS, OR TO EXIT LETTER MODE.": GOSUB 5000
620 PRINT " IF YOU WOULD LIKE TO CHANGE CHARAC- TER SETS OR PICTURES, PRESS ": GOSUB 5000
630 PRINT " AND FINALLY, THE ELLIPSE MAKER... PRESS TO DRAW AN ELLIPSE WITH YOUR": PRINT "CURSOR'S POSITION AS THE CENTER."
640 PRINT " THE COMPUTER WILL ASK FOR TWO VALUESTHAT IT USES IN ITS ELLIPSE FORMULA.": PRINT "BY ENTERING THE GIVEN DEFAULT VALUES FOR COS(X) AND SIN(X), THE PROGRAM WILL"
650 PRINT "DRAW A CIRCLE. ENTERING DIFFERENT VALUESWILL FLATTEN AND STRETCH THE ELLIPSE.": PRINT "THIS WILL REQUIRE SOME EXPERIMENTATION. AFTER THE TWO FORMULA VALUES IT WILL ASK";
660 PRINT "YOU FOR THE RADIUS AND START DRAWING THECIRCLE. WHEN THE CIRCLE LOOKS FINISHED": PRINT "OR YOU CAN TELL THAT YOU DON'T WANT IT, PRESS THE SPACE BAR AND DECIDE ON YOUR"
670 PRINT "ELLIPSE'S FATE JUST LIKE YOU DID WITH THE FILL-IN PORTION OF THE PROGRAM.": GOSUB 5000
680 PRINT " WELL, THAT'S IT. THIS PROGRAM IS EASY TO USE ONCE YOU GET THE HANG OF IT.";: PRINT "EXPERIMENT AND PRACTICE WILL HELP LOADS."
690 PRINT " IF YOU DON'T KNOW WHAT TO DRAW, TRY ADDING ON OR CHANGING SOME OF MY": PRINT "PICTURES.": PRINT : PRINT : PRINT " SINCERELY,": PRINT : PRINT " MICHAEL FINK"
700 PR# 0: END
5000 IF S THEN PRINT : RETURN
5005 VTAB 23: HTAB 6: PRINT "PRESS SPACE BAR TO CONTINUE"
5010 IF PEEK( -16384) < >160 THEN 5010
5020 POKE -16368,0: HOME : RETURN
Text found in Pirates_Signature_v1.0_1984_Johnney_Appleseed.do/DRAW.bas:
4 PRINT CHR$(4);"NOMON C,I,O"
5 TEXT : HOME : SPEED= 255: INVERSE
6 HTAB 9: PRINT "/-----------------------\": HTAB 9: PRINT "! MICK'S DRAW PROGRAM !": HTAB 9: PRINT "\-----------------------/": NORMAL
8 POKE 230,64
9 D$ = CHR$(4)
10 GOSUB 9000
20 VTAB 10: INPUT "WOULD YOU LIKE TO CONTINUE FROM A PREVIOUS SCREEN (Y/N)? ";A$:A$ = LEFT$(A$,1)
30 IF A$ = "N" THEN GOSUB 4110: GOSUB 9130: GOTO 90
40 INPUT "ENTER NAME: ";N$: IF N$ = "" THEN PRINT D$;"CATALOG": GOTO 40
50 HGR2 : PRINT D$;"BLOAD ";N$;",A$4000"
60 GOSUB 9140
90 P1 = -16368: HCOLOR= 3
100 P = PEEK( -16384)
110 IF P <127 THEN 100
120 IF P = ASC(" ") +128 THEN POKE P1,0: GOTO 100
130 A$ = CHR$(P -128):FR = FRE(0)
140 IF A$ = "M" THEN Y = Y +M2 +1: GOTO 500
150 IF A$ = "I" THEN Y = Y -M2 -1: GOTO 500
160 IF A$ = "J" THEN X = X -M2 -1: GOTO 500
170 IF A$ = "K" THEN X = X +M2 +1: GOTO 500
180 IF A$ = "U" THEN X = X -M2 -1:Y = Y -M2 -1: GOTO 500
190 IF A$ = "N" THEN X = X -M2 -1:Y = Y +M2 +1: GOTO 500
200 IF A$ = "," THEN X = X +M2 +1:Y = Y +M2 +1: GOTO 500
210 IF A$ = "O" THEN X = X +M2 +1:Y = Y -M2 -1: GOTO 500
220 IF A$ = "X" THEN POKE -16368,0: GOTO 7000
230 IF A$ < >"Q" THEN 260
240 X(XY) = X:Y(XY) = Y:XY = NOT XY:X = X(XY):Y = Y(XY):M1 = 1
250 POKE -16368,0: GOTO 100
260 IF A$ < >"?" THEN 300
270 M1 = 0
280 HPLOT X,Y TO X( NOT XY),Y( NOT XY)
290 POKE -16368,0: GOTO 100
300 IF A$ = "R" THEN M2 = M2 +1: POKE -16368,0: IF M2 >20 THEN M2 = 1
310 IF A$ = CHR$(18) THEN M2 = 0: POKE P1,0: GOTO 100
320 IF A$ = "C" THEN POKE P1,0:M3 = 0: GOTO 340
330 GOTO 410
340 P = PEEK( -16384): IF P <127 THEN 340
350 P = P -128
360 IF P <48 OR P >55 THEN POKE P1,0: GOTO 100
370 P = P -48
380 HCOLOR= P
390 POKE P1,0: IF M3 = 0 THEN 100
400 IF M3 = 1 THEN HPLOT 0,0: CALL 62454: GOTO 100
410 IF A$ = "B" THEN M3 = 1: POKE P1,0: GOTO 340
420 IF A$ = "E" THEN HGR2 : POKE P1,0:X = 0:Y = 0: GOTO 100
430 IF A$ < >"S" THEN 570
440 TEXT : HOME : VTAB 4: POKE P1,0
450 INPUT "WOULD YOU LIKE TO SAVE IT? ";Y$:Y$ = LEFT$(Y$,1): IF Y$ = "N" THEN END
455 CALL 820
460 GOTO 9200
470 PRINT : PRINT : INPUT "CONTINUE? ";Y$:Y$ = LEFT$(Y$,1): IF Y$ = "N" THEN END
480 POKE -16299,0: POKE -16297,0: POKE -16302,0: POKE -16304,0: GOTO 100
490 GOTO 570
500 IF X <0 THEN X = 279:MZ = 1
510 IF X >279 THEN X = 0:MZ = 1
520 IF Y <0 THEN Y = 191:MZ = 1
530 IF Y >191 THEN Y = 0:MZ = 1
535 IF MZ THEN 550
540 IF M2 THEN HPLOT TO X,Y: GOTO 100
550 POKE P1,0
560 HPLOT X,Y:MZ = 0: GOTO 4410
570 IF A$ < >"W" THEN 630
580 TEXT : HOME : PRINT "YOU ARE USING CURSOR #";XY +1
590 POKE P1,0
600 PRINT "YOU ARE CURRENTLY AT ";X;",";Y;"."
610 INPUT "ENTER NEW COORDINATES: ";X,Y
620 M2 = 0: GOSUB 7120: GOTO 500
630 IF A$ < > CHR$(12) THEN 3000
640 POKE P1,0:M4 = 0
650 X5 = INT(40 *((X +1)/280)):Y5 = INT(24 *((Y +1)/192))
660 GET Q$:Q = ASC(Q$):FR = FRE(0)
670 IF Q$ > = " " AND Q$ < = "Z" THEN 710
671 IF Q$ = CHR$(20) THEN FOR I = 1 TO 8:A%(I) = RND(1) *256: NEXT : GOTO 710
675 IF Q$ = CHR$(14) THEN M7 = 0: GOTO 660
680 IF Q$ = CHR$(27) THEN GOSUB 1000: GOTO 660
690 IF Q$ = CHR$(19) THEN A$ = CHR$(19): GOTO 3000
695 IF Q$ = CHR$(9) THEN M7 = 1: GOTO 660
700 IF Q$ <" " THEN 2000
710 GOSUB 6050
780 GOSUB 6000
790 FOR I = 0 TO 8: POKE (H +(1024 *I)),A%(I)
800 NEXT I:FR = FRE(0)
810 X5 = X5 +1:X = X +7
820 IF X5 >39 THEN X5 = 0:Y5 = Y5 +1:X = 0:Y = Y +8
830 IF Y5 >23 THEN Y5 = 0:Y = 0
840 GOTO 660
1000 GET Q$:Q = ASC(Q$):M4 = 1:FR = FRE(0)
1010 IF Q$ = "J" THEN Q = -24: GOTO 2030
1020 IF Q$ = "K" THEN Q = -11: GOTO 2080
1030 IF Q$ < >"M" THEN 1070
1040 Y5 = Y5 +1:Y = Y +8
1050 IF Y5 >23 THEN Y5 = 0:Y = 0
1060 GOTO 1000
1070 IF Q$ < >"I" THEN 1110
1080 Y5 = Y5 -1:Y = Y -8
1090 IF Y5 <0 THEN Y5 = 23:Y = 183
1100 GOTO 1000
1110 IF Q$ < >"@" THEN M4 = 0: RETURN
1120 HGR2 :Y5 = 0:X5 = 0:Y = 0:X = 0
1130 M4 = 0: RETURN
2000 IF Q$ = CHR$(13) THEN Q$ = CHR$(91): GOTO 710
2010 IF Q$ = CHR$(24) THEN Q$ = CHR$(92): GOTO 710
2030 IF Q$ < > CHR$(8) THEN 2080
2040 X5 = X5 -1:X = X -7
2050 IF X5 <0 THEN X5 = 39:X = 272:Y5 = Y5 -1:Y = Y -8
2060 IF Y5 <0 THEN Y5 = 0:Y = 0
2070 IF M4 = 0 THEN GOTO 660
2075 GOTO 1000
2080 IF Q$ < > CHR$(21) THEN M7 = 0: GOTO 100
2090 X5 = X5 +1:X = X +7
2100 IF X5 >40 THEN X5 = 0:X = 0:Y5 = Y5 +1:Y = Y +8
2110 IF Y5 >24 THEN Y5 = 0:Y = 0
2120 IF M4 = 0 THEN 660
2130 GOTO 1000
3000 IF A$ < > CHR$(19) THEN 3430
3010 POKE P1,0:M4 = 0
3020 X5 = INT(40 *((X +1)/280)):Y5 = INT(24 *((Y +1)/192))
3030 GET Q$:FR = FRE(0)
3035 IF Q$ > = "A" AND Q$ < = "Z" THEN
3040 IF Q$ = CHR$(13) THEN Q$ = CHR$(123)
3045 IF Q$ = CHR$(14) THEN M7 = 0: GOTO 3030
3050 IF Q$ = CHR$(93) THEN Q$ = CHR$(121)
3055 IF Q$ = CHR$(9) THEN M7 = 1: GOTO 3030
3060 IF Q$ = CHR$(12) THEN 660
3070 IF Q$ = CHR$(94) THEN Q$ = CHR$(124)
3080 IF Q$ <" " THEN 3300
3090 GOSUB 6050
3100 GOSUB 6150
3160 FOR I = 0 TO 8
3170 POKE H +1024 *I,A%(I)
3180 NEXT I:FR = FRE(0)
3190 X5 = X5 +1:X = X +7
3200 IF X5 >39 THEN X5 = 0:Y5 = Y5 +1:X = 0:Y = Y +8
3210 IF Y5 >23 THEN Y5 = 0:Y = 0
3220 GOTO 3030
3300 IF Q$ = CHR$(8) THEN X5 = X5 -1:X = X -7: GOTO 3320
3310 GOTO 3350
3320 IF X5 <0 THEN Y5 = Y5 -1:Y = Y -8:X5 = 40:X = 272
3330 IF Y5 <0 THEN Y5 = 0:Y = 0
3340 GOTO 3030
3350 IF Q$ = CHR$(21) THEN X5 = X5 +1:X = X +7: GOTO 3370
3360 GOTO 3400
3370 IF X5 >40 THEN Y5 = Y5 +1:Y = Y +8:X5 = 0:X = 0
3380 IF Y5 >24 THEN Y5 = 24:Y = 191 -8
3390 GOTO 3030
3400 REM
3410 IF Q$ = CHR$(27) THEN GOSUB 1000: GOTO 3030
3420 M7 = 0: GOTO 100
3430 IF A$ < > CHR$(2) THEN 3560
3440 POKE P1,0: TEXT : HOME : VTAB 10
3450 POKE P1,0: GOTO 6300
3560 IF A$ < > CHR$(26) THEN 4260
3570 POKE P1,0
3580 IF DY >FY THEN POKE 0,FY: POKE 1,DY: GOTO 3600
3590 POKE 0,DY: POKE 1,FY
3600 IF DX >FX THEN POKE 2, INT(FX/7): POKE 3, INT(DX/7): GOTO 3620
3610 POKE 2, INT(DX/7): POKE 3, INT(FX/7)
3620 GET A$: PRINT A$
3630 IF A$ = "I" THEN & U
3640 IF A$ = "M" THEN & D
3650 IF A$ = "J" THEN & L
3660 IF A$ = "K" THEN & R
3670 IF A$ = " " OR ASC(A$) = 26 THEN 100
3680 GOTO 3620
4110 POKE -16297,0
4120 POKE -16299,0
4130 POKE -16304,0
4140 POKE -16302,0
4150 RETURN
4160 POKE 777,64: POKE 782,96: POKE 807,128: CALL 768: RETURN
4170 POKE 777,96: POKE 782,64: POKE 807,96: CALL 768: RETURN
4250 PRINT CHR$(7): PRINT CHR$(7): GOTO 100
4260 IF A$ = "D" THEN DX = X:DY = Y: GOTO 100
4270 IF A$ = "F" THEN FX = X:FY = Y: GOTO 100
4280 IF A$ < >"G" THEN 4310
4285 POKE P1,0
4290 FOR I = DX TO FX STEP 1 +(FX "P" THEN 4340
4320 FOR I = 1 TO 10:I2 = INT( RND(1) *280)
4330 I3 = INT( RND(1) *192): HPLOT I2,I3: NEXT : POKE P1,0: GOTO 100
4340 REM QUITE A BIT HERE, EH?
4380 IF P = 141 THEN 6400
4385 IF P = 134 THEN 6710
4390 IF A$ = "Z" THEN SS = NOT SS: POKE P1,0
4400 GOTO 4430
4410 IF NOT SS THEN 100
4420 HPLOT 279 -X,Y: HPLOT 279 -X,191 -Y: HPLOT X,191 -Y: GOTO 100
4430 IF A$ = CHR$(7) THEN HPLOT DX,DY TO DX,FY TO FX,FY TO FX,DY TO DX,DY: POKE P1,0: GOTO 100
4440 IF A$ = CHR$(17) THEN X(XY) = X:Y(XY) = Y: HPLOT X(0),Y(0) TO X(0),Y(1) TO X(1),Y(1) TO X(1),Y(0) TO X(0),Y(0): POKE P1,0: GOTO 100
4450 GOTO 100
6000 IF Q$ = CHR$(20) THEN RETURN
6010 Q = 37376 +( ASC(Q$) -32) *8
6020 FOR I = 0 TO 8:A%(I) = PEEK(Q +I): IF M7 THEN A%(I) = 255 -A%(I)
6030 NEXT : RETURN
6050 H = 16384
6060 IF Y5 >7 THEN 6080
6070 H = H +128 *Y5: GOTO 6110
6080 IF Y5 >15 THEN 6100
6090 H = H +40:H = H +128 *(Y5 -8): GOTO 6110
6100 H = H +80:H = H +128 *(Y5 -16)
6110 H = H +X5: RETURN
6150 IF Q$ > = " " AND Q$ <"A" THEN 6010
6160 IF ASC(Q$) >90 THEN Q$ = CHR$( ASC(Q$) -30)
6170 Q = 37376 + ASC(Q$) *8: GOTO 6020
6300 PRINT "1)...LOAD NEW CHARACTER SET": PRINT "2)...LOAD NEW PICTURE": PRINT : PRINT : INPUT "ENTER NUMBER: ";A$
6310 IF VAL(A$) = 2 THEN PRINT : PRINT : GOTO 40
6320 IF VAL(A$) < >1 THEN GOSUB 4110: GOTO 100
6330 PRINT : PRINT : PRINT "ENTER NAME OF CHARACTER SET": INPUT ">";CC$
6340 PRINT D$;"BLOAD "CC$",A37376": GOSUB 4110: GOTO 630
6400 TEXT : HOME : HTAB 13: PRINT "PROGRAM STATUS": POKE P1,0
6410 X(XY) = X:Y(XY) = Y: PRINT : PRINT : IF NOT XY THEN INVERSE : PRINT "CURSOR 1:("X(0)","Y(0)")",: NORMAL : GOTO 6418
6414 PRINT "CURSOR 1:("X(0)","Y(0)")",: INVERSE
6418 HTAB 23: PRINT "CURSOR 2:("X(1)","Y(1)")",: NORMAL : PRINT
6420 PRINT "COLOR= ";
6430 I = PEEK(228): IF NOT I THEN PRINT "BLACK (0)"
6440 IF I = 42 THEN PRINT "GREEN (1)"
6450 IF I = 85 THEN PRINT "PURPLE (2)"
6460 IF I = 127 THEN PRINT "WHITE (3)"
6470 IF I = 128 THEN PRINT "BLACK (4)"
6480 IF I = 170 THEN PRINT "ORANGE (5)"
6490 IF I = 213 THEN PRINT "BLUE (6)"
6500 IF I = 255 THEN PRINT "WHITE (7)"
6510 PRINT : PRINT "D=("DX","DY")";: HTAB 23: PRINT "F=("FX","FY")"
6520 PRINT : PRINT "CHARACTER SET NAME: ";CC$
6700 VTAB 23: HTAB 5: PRINT "PRESS RETURN AGAIN WHEN READY";: INPUT " ";A$: GOSUB 4110: GOTO 100
6710 GOSUB 4160
6720 POKE P1,0: TEXT : HOME :OP = 0
6730 PRINT " SELECT A COLOR FROM THE FOLLOWING DISPLAY BY HITTING THE SPACE BAR WHEN READY AND THEN ENTERING THE COLOR NUMBER. IF YOU PRESS RETURN INSTEAD OF THE SPACE BAR, YOU WILL GET A DIFFERENT SELECTION OF COLORS."
6735 PRINT " IF YOU ALREADY KNOW THE COLOR NUMBER, THEN INSTEAD OF PRESSING THE SPACE BAR NOW, ENTER '1' OR '2' DEPENDING ON THE PAGE NUMBER OF YOUR COLOR SELECTION. PAGE ONE IS THE ONE WITH TWO BLACKS ATTHE TOP."
6737 PRINT : PRINT "PRESS SPACE BAR TO CONTINUE ";: GET A$: PRINT A$
6740 IF A$ = CHR$(27) THEN 6820
6745 IF A$ = "1" OR A$ = "2" THEN HOME :OP = VAL(A$) -1: GOTO 6780
6750 HGR2 : POKE 33541,128: CALL 33536: POKE 33541,96:J = PEEK(228): HCOLOR= 3: FOR I = 0 TO 22: HPLOT 0,I *8 +7 TO 279,I *8 +7: NEXT : POKE 228,J
6755 POKE 34458,40: IF OP THEN POKE 34458,232
6756 FOR I = 0 TO 23
6760 POKE 0,0: POKE 1,0: POKE 2,I *8 +1: POKE 3,I: POKE 4,64: CALL 34048: NEXT I
6770 GET A$: PRINT A$: IF A$ = CHR$(13) THEN OP = NOT OP: GOTO 6750
6774 TEXT : HOME
6780 INPUT "ENTER COLOR #:";FK%: IF FK% <0 OR FK% >23 THEN 6820
6784 POKE 34458,40: IF OP THEN POKE 34458,232
6785 PRINT : PRINT "AFTER IT FILLS IT IN, DECIDE WHETHER YOULIKE IT THAT WAY OR NOT AND PRESS A KEY.": PRINT "PRESS A KEY TO SEE THE RESULT: ";: GET A$: PRINT A$: HGR2
6790 POKE 2,Y: POKE 3,FK%: POKE 4,64: POKE 1,(X >255): IF X >255 THEN POKE 0,X -256: GOTO 6810
6800 POKE 0,X
6810 GOSUB 4170: CALL 34048: GET A$: PRINT A$: TEXT : HOME : INPUT "DO YOU WANT TO KEEP IT THE WAY THAT THE PICTURE IS NOW? ";A$: IF LEFT$(A$,1) < >"N" THEN GOSUB 7120: GOTO 100
6820 GOSUB 4170: GOSUB 7120: GOTO 100
7000 TEXT : HOME :V = 0
7010 PRINT ,"X=";X,"Y=";Y
7020 PRINT : PRINT
7030 GOTO 7330
7120 POKE -16299,0: POKE -16297,0: POKE -16302,0: POKE -16304,0
7130 RETURN
7330 M5 = 0: PRINT : INPUT "ENTER NUMBER FOR COS(X) ";A$:T2 = VAL(A$): IF A$ = "" THEN T2 = 30
7340 INPUT "ENTER NUMBER FOR SIN(Y) ";A$:T1 = VAL(A$): IF A$ = "" THEN T1 = 35
7350 INPUT "ENTER RADIUS: ";R: PRINT
7355 GOSUB 4160: GOSUB 7120
7357 XX = 0: GOSUB 7390: GOTO 7480
7360 REM
7370 REM
7380 GOSUB 7120: GOTO 100
7390 V = V +2
7410 X8 = ( COS(V) *R *R)/T2
7420 Y8 = ( SIN(V) *R *R)/T1
7430 X9 = X8 +X:Y9 = Y8 +Y
7440 IF X9 <0 OR X9 >279 OR Y9 <0 OR Y9 >191 THEN 7390
7450 HPLOT X9,Y9
7455 IF SS THEN 7560
7460 IF PEEK( -16384) < >160 THEN 7390
7470 POKE P1,0: RETURN
7480 TEXT : HOME : INPUT "DO YOU STILL WANT TO DRAW IT? ";A$:A$ = LEFT$(A$,1):FR = FRE(0)
7490 IF A$ = "Y" THEN 7530
7500 IF A$ < >"N" THEN PRINT "(Y/N)": GOTO 7480
7510 POKE 777,96: POKE 782,64: POKE 807,96
7520 POKE P1,0: GOSUB 7120: CALL 768: GOTO 100
7530 REM
7540 POKE P1,0
7550 GOTO 7360
7560 HPLOT 279 -X9,Y9: IF M5 THEN HPLOT TO 279 -X,Y
7570 HPLOT 279 -X9,191 -Y9: IF M5 THEN HPLOT TO 279 -X,191 -Y
7580 HPLOT X9,191 -Y9: IF M5 THEN HPLOT TO X,191 -Y
7590 GOTO 7460
9000 PRINT D$;"BLOAD DRAW.OBJ": CALL 34816:D$ = CHR$(4)
9010 VTAB 13: PRINT "INSERT DOS TOOLKIT DISK AND PRESS RETURNIF NOT AVAILABLE PRESS ESC ";: GET A$: PRINT A$
9020 IF A$ = CHR$(13) THEN CC$ = "ASCII.SET": PRINT D$;"BLOAD ";CC$;",A37376": GOTO 9100
9030 IF A$ = CHR$(27) THEN CC$ = "NONE AVAILABLE": GOTO 9100
9040 GOTO 9010
9100 VTAB 13: CALL -958: FOR I = 768 TO 860
9110 READ J: POKE I,J
9120 NEXT I
9125 FX = 279:FY = 191
9130 PRINT CHR$(7); CHR$(7): RETURN
9140 IF PEEK(43616) + PEEK(43617) *256 <8180 THEN GOSUB 4160: CALL 33536
9150 GOTO 9130
9200 INPUT "ENTER NAME: ";Y$
9210 INPUT "WOULD YOU LIKE IT PACKED (Y/N)? ";A$:A$ = LEFT$(A$,1)
9220 IF A$ = "N" THEN PRINT D$;"BSAVE ";Y$;",A$4000,L$2000": GOTO 470
9230 IF A$ < >"Y" THEN 9210
9240 CALL 33792: PRINT D$;"BSAVE"Y$",A$6000,L";( PEEK(0) + PEEK(1) *256) -24576: GOTO 470
10150 DATA 169,0,141,44,3,141,47,3
10160 DATA 169,64,141,45,3,169,96,141,48,3,32,43,3
10170 DATA 238,44,3,238,47,3,208,245,238,45,3
10180 DATA 238,48,3,174,48,3,224,128,208,232
10190 DATA 96,173,0,32,141,0,64,96,96,0
10195 DATA 162,0,189,0,64,201,128,208,2,169,0,157,0,64,232,208,241,174,56,3,232,224,96,208,2,162,64,142,56,3,142,65,3,224,64,208,219,96,0,0,0
10200 REM
64770 REM --------------------
64780 REM ! !
64790 REM ! /--------------\ !
64800 REM ! ! DRAW ! !
64810 REM ! \--------------/ !
64820 REM ! !
64830 REM ! WRITTEN BY !
64840 REM ! MICHAEL FINK !
64850 REM ! SEPT. 1982 !
64860 REM ! !
64870 REM --------------------
64880 REM ! !
64890 REM ! ADDITIONAL !
64900 REM ! MATERIAL BY !
64910 REM ! !
64920 REM ! EAGLE I. BERNS !
64930 REM ! KEN HALEY !
64940 REM ! EDWARD C. SO !
64950 REM ! !
64960 REM --------------------
Text found in Pirates_Signature_v1.0_1984_Johnney_Appleseed.do/HELLO.bas:
1 CALL 4864
Text found in Pirates_Signature_v1.0_1984_Johnney_Appleseed.do/HOW TO VIEW A PACKED PICTURE.bas:
10 HOME : PRINT " BLOAD YOUR PACKED PICTURE AT $6000.": PRINT " NEXT BLOAD UNPACK."
20 PRINT " TYPE 'HGR2'": PRINT " TYPE 'CALL 768"
Text found in Pirates_Signature_v1.0_1984_Johnney_Appleseed.do/INSTRUCTIONS.bas:
10 PRINT "BLOAD DISPLAYER"
15 ONERR GOTO 20
19 PRINT CHR$(4);"BLOAD DAGA"
20 FOR Z = 1 TO 5
21 FOR X = 32 TO 52 STEP 4: POKE 7,X: CALL 768: NEXT
22 FOR X = 52 TO 32 STEP -4: POKE 7,X: CALL 768: NEXT
23 NEXT Z
25 A = 32
30 POKE 7,32: CALL 768
40 IF PEEK( -16384) <128 THEN 40
50 X = PEEK( -16384): POKE -16368,0:X = X -128
60 IF X = 8 THEN A = A -4: IF A <32 THEN A = 32
70 IF X = 21 THEN A = A +4: IF A >52 THEN A = 52
80 IF X = 13 THEN A = 32
90 IF X = 27 THEN PRINT "RUNHELLO"
100 POKE 7,A: CALL 768: GOTO 40
Text found in Pirates_Signature_v1.0_1984_Johnney_Appleseed.do/INTRO.DATA.txt:
Offset Hex Data Characters
======= ================================================ =================
$000000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000010 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000020 20 20 20 20 20 20 20 20 A0 81 8C 8C BA A0 A0 A0 ...:
$000030 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000040 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000050 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 9B 92 85 94 95 .....
$000060 92 8E 9D A0 BD A0 92 85 94 95 92 8E A0 94 8F A0 ... = .. .... ..
$000070 94 88 89 93 A0 A0 A0 A0 08 93 AA C9 A0 F0 10 AD .... ..*I p.-
$000080 20 20 20 20 20 20 20 20 20 10 09 12 01 14 05 27 ......'
$000090 13 20 20 13 09 07 0E 01 14 15 12 05 20 20 20 20 . ..... ....
$0000A0 20 20 20 20 20 20 20 20 A0 A0 A0 A0 A0 A0 A0 A0
$0000B0 A0 A0 A0 A0 4A 4F 48 4E 4E 45 59 60 41 50 50 4C JOHN NEY`APPL
$0000C0 45 53 45 45 44 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 ESEED
$0000D0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 9B 85 ..
$0000E0 93 83 9D A0 BD A0 92 85 94 95 92 8E A0 94 8F A0 ... = .. .... ..
$0000F0 8D 85 8E 95 A0 A0 A0 A0 04 A9 5D 0A A9 D0 93 AE .... .)].)P..
$000100 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000110 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000120 20 20 20 20 20 20 20 20 A0 A0 A0 A0 A0 A0 A0 A0
$000130 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000140 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000150 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000160 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000170 A0 A0 A0 A0 A0 A0 A0 A0 25 9C 20 80 A1 4C 83 9F %. .!L..
$000180 20 20 20 20 20 20 28 14 08 05 20 05 07 0F 2D 0D (. .. ...-.
$000190 01 0E 09 01 03 27 13 20 15 14 09 0C 09 14 19 29 .....'. .......)
$0001A0 20 20 20 20 20 20 20 20 A0 A0 A0 A0 A0 A0 A0 A0
$0001B0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0001C0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0001D0 A8 82 85 83 95 81 93 85 A0 89 A0 81 8D A0 81 A0 (....... . .. .
$0001E0 94 92 95 85 A0 85 87 8F AD 8D 81 8E 89 81 83 AC .... ... -......,
$0001F0 A0 89 86 A0 A0 A0 A0 A0 60 45 90 CF 38 60 06 44 .. `E.O8`.D
$000200 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000210 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000220 20 20 20 20 20 20 20 20 83 8F 8E 94 92 8F 8C 93 ........
$000230 BA A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 :
$000240 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000250 A0 93 8F 8D 85 8F 8E 85 A0 A7 8D 85 93 93 85 93 ....... '......
$000260 A7 A0 97 89 94 88 A0 8D 99 A0 8C 8F 87 8F AC A0 ' .... . . ....,
$000270 89 A7 8C 8C A0 92 89 90 60 A2 4C EA A2 A9 0C D0 .'.. ... `"Lj").P
$000280 20 20 20 20 20 20 20 20 20 20 20 20 20 09 0E 14 ...
$000290 12 0F 04 15 03 14 09 0F 0E 20 20 20 20 20 20 20 ........ .
$0002A0 20 20 20 20 20 20 20 20 A0 A0 A0 A0 A0 A0 A0 A0
$0002B0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0002C0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0002D0 A0 94 88 85 92 85 A0 8C 95 8E 87 93 A0 8F 95 94 ..... . .... ...
$0002E0 A1 A1 A1 A1 A9 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 !!!!)
$0002F0 A0 A0 A0 A0 A0 A0 A0 A0 02 4C EA A2 20 AF A7 D0 .Lj" /'P
$000300 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000310 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000320 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000330 A0 8C 85 86 94 A0 81 92 92 8F 97 A0 BD A0 82 81 .... .. ... = ..
$000340 83 8B A0 8F 8E 85 A0 90 81 87 85 A0 A0 A0 A0 A0 .. ... . ...
$000350 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000360 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000370 A0 A0 A0 A0 A0 A0 A0 A0 29 01 D0 06 8E 72 AA 8C ).P..r*.
$000380 A0 8D 81 84 85 A0 82 99 A0 94 88 85 A0 82 89 87 .... .. ... ...
$000390 87 85 93 94 A0 85 87 8F AD 8D 81 8E 89 81 83 A0 .... ... -......
$0003A0 8F 86 A0 94 88 85 8D A0 A0 A0 A0 A0 A0 A0 A0 A0 .. ....
$0003B0 92 89 87 88 94 A0 81 92 92 8F 97 A0 BD A0 86 8F ..... .. ... = ..
$0003C0 97 81 92 84 A0 8F 8E 85 A0 90 81 87 85 A0 A0 A0 .... ... ....
$0003D0 01 02 04 15 0C 27 13 20 0F 01 13 09 13 20 20 20 .....'. .....
$0003E0 20 20 20 20 20 20 20 20 20 20 28 36 31 39 29 20 (619)
$0003F0 33 34 31 2D 32 39 38 34 B5 8D C3 B5 4C A8 A6 8C 341-2984 5.C5L(&.
$000400 10 09 12 01 14 05 27 13 20 13 09 07 0E 01 14 15 ......'. .......
$000410 12 05 20 20 20 20 20 0A 0F 08 0E 0E 05 19 20 01 .. . ...... .
$000420 10 10 0C 05 13 05 05 04 93 85 85 AE A0 A0 99 8F ........ .... ..
$000430 95 A0 8B 8E 8F 97 A0 99 8F 95 A0 8C 8F 96 85 A0 . .... . .. ....
$000440 94 8F A0 82 85 A0 81 84 8D 89 92 85 84 A0 A0 A0 .. .. .. .....
$000450 A0 A0 82 A9 A0 83 92 81 83 8B A0 89 94 A0 A0 A0 .) ... .. ..
$000460 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000470 A0 A0 A0 A0 A0 A0 A0 A0 07 93 AA C9 A0 F0 0E AD ..*I p.-
$000480 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000490 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0004A0 A0 A0 A0 A0 A0 A0 A0 A0 82 99 A0 81 8C 8C A0 94 .. ... .
$0004B0 88 85 A0 90 89 92 81 94 85 93 A0 94 88 81 94 A0 .. ..... .. ....
$0004C0 99 8F 95 A0 8B 8E 8F 97 AE A0 A0 A0 A0 A0 A0 A0 ... .... .
$0004D0 A0 A0 83 A9 A0 82 8F 8F 94 A0 94 88 89 93 A0 90 .) ... . .... .
$0004E0 92 8F 87 92 81 8D A0 95 90 AC A0 81 8E 84 A0 90 ...... . ., ... .
$0004F0 8C 81 93 94 85 92 A0 A0 04 A9 5D 0A A9 D0 93 AE ...... .)].)P..
$000500 B1 A9 A0 97 88 81 94 A0 94 88 85 A0 86 95 83 8B 1) .... ... ....
$000510 A0 89 93 A0 90 89 92 81 94 85 A7 93 A0 93 89 87 .. .... ..'. ...
$000520 8E 81 94 95 92 85 BF A0 A0 A0 A0 A0 A0 A0 A0 A0 ......?
$000530 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000540 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000550 A0 A0 A0 A0 A0 99 8F 95 92 A0 8E 81 8D 85 A0 81 ... . .... .
$000560 8C 8C A0 8F 96 85 92 A0 94 88 85 A0 83 92 81 83 .. .... ... ....
$000570 8B 85 84 A0 A0 A0 A0 A0 25 9C 20 80 A1 4C 83 9F ... %. .!L..
$000580 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000590 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0005A0 A0 A0 A0 A0 A0 A0 A0 A0 B2 A9 A0 87 92 85 81 94 2) .....
$0005B0 A1 A0 A0 82 95 94 A0 85 98 81 83 94 8C 99 A0 88 ! ... . ...... .
$0005C0 8F 97 A0 84 8F 85 93 A0 89 94 A0 A0 A0 A0 A0 A0 .. .... ..
$0005D0 A0 A0 A0 A0 A0 84 89 93 8B AE A0 A0 A0 A0 A0 A0 ... ..
$0005E0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0005F0 A0 A0 A0 A0 A0 A0 A0 A0 60 45 90 CF 38 60 06 44 `E.O8`.D
$000600 A0 97 88 81 94 A0 94 88 89 93 A0 90 92 8F 87 92 .... .. .. .....
$000610 81 8D A0 84 8F 85 93 A0 89 93 A0 94 81 8B 85 A0 .. .... .. ....
$000620 94 88 85 A0 A0 A0 A0 A0 A0 A0 A0 88 85 8C 90 A0 ... ....
$000630 8D 85 A0 87 85 94 A0 81 A0 92 85 90 95 94 81 94 .. ... . .......
$000640 89 8F 8E BF A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 ...?
$000650 A0 A0 84 A9 A0 87 89 96 85 A0 8D 85 A0 81 A0 83 .) ... . .. . .
$000660 8F 90 99 A0 8F 86 A0 94 88 85 A0 83 92 81 83 8B ... .. . .. .....
$000670 85 84 A0 84 89 93 8B A0 60 A2 4C EA A2 A9 0C D0 .. .... `"Lj").P
$000680 84 92 95 84 87 85 92 99 A0 8F 95 94 A0 8F 86 A0 ........ ... ..
$000690 85 87 8F AD 8D 81 8E 89 93 8D AE A0 A0 99 8F 95 ...-.... ... ...
$0006A0 A0 8B 8E 8F 97 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 ....
$0006B0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0006C0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0006D0 A0 A0 85 A9 A0 87 89 96 85 A0 89 94 A0 94 8F A0 .) ... . .. ..
$0006E0 81 8C 8C A0 99 8F 95 92 A0 86 92 89 85 8E 84 93 ... .... .......
$0006F0 A0 A0 A0 A0 A0 A0 A0 A0 02 4C EA A2 20 AF A7 D0 .Lj" /'P
$000700 99 8F 95 A0 8C 8F 96 85 A0 94 8F A0 93 85 85 A0 ... .... .. ...
$000710 99 8F 95 92 A0 8E 81 8D 85 A0 95 90 A0 89 8E A0 .... ... . .. ..
$000720 8C 89 87 88 94 93 A0 A0 A0 A0 97 85 8C 8C AC A0 ...... ....,
$000730 88 85 92 85 A7 93 A0 97 88 81 94 A0 99 8F 95 A0 ....'. . ... ...
$000740 84 8F BA A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 ..:
$000750 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000760 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000770 A0 A0 A0 A0 A0 A0 A0 A0 29 01 D0 06 8E 72 AA 8C ).P..r*.
$000780 86 8F 92 A0 81 8C 8C A0 94 88 85 A0 92 85 93 94 ... ... ... ....
$000790 A0 8F 86 A0 94 88 85 A0 90 89 92 81 94 85 93 A0 .. ... .......
$0007A0 94 8F A0 A0 A0 A0 A0 A0 A0 A0 81 A9 A0 87 85 94 .. .) ...
$0007B0 A0 99 8F 95 92 A0 88 81 8E 84 93 A0 8F 8E A0 93 .... .. ... .. .
$0007C0 8F 8D 85 A0 90 92 8F 87 92 81 8D A0 A0 A0 A0 A0 ... .... ...
$0007D0 01 02 04 15 0C 27 13 20 0F 01 13 09 13 20 20 20 .....'. .....
$0007E0 20 20 20 20 20 20 20 20 20 20 28 36 31 39 29 20 (619)
$0007F0 33 34 31 2D 32 39 38 34 B5 8D C3 B5 4C A8 A6 8C 341-2984 5.C5L(&.
$000800 10 09 12 01 14 05 27 13 20 13 09 07 0E 01 14 15 ......'. .......
$000810 12 05 20 20 20 20 20 0A 0F 08 0E 0E 05 19 20 01 .. . ...... .
$000820 10 10 0C 05 13 05 05 04 A0 90 89 83 94 95 92 85 ........ .......
$000830 A0 89 93 A0 84 89 93 90 8C 81 99 85 84 A0 95 8C .. .... ..... ..
$000840 94 92 81 AD 86 81 93 94 AE A0 A0 90 8C 95 93 A0 ...-.... . ....
$000850 B4 A9 A0 89 A0 81 8D A0 94 88 85 A0 8C 81 8D 85 4) . .. ... ....
$000860 93 94 A0 81 92 94 89 93 94 A0 89 8E A0 94 88 85 .. ..... . .. ...
$000870 A0 97 8F 92 8C 84 AC A0 06 93 AA C9 A0 F0 0C AD ....., ..*I p.-
$000880 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000890 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0008A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 89 86 A0 99 8F 95 A0 .. ...
$0008B0 81 92 85 A0 97 89 8C 8C 89 8E 87 A0 94 8F A0 93 ... .... ... .. .
$0008C0 81 83 92 89 86 89 83 85 A0 93 8F 8D 85 A0 A0 A0 ........ ....
$0008D0 A0 A0 A0 88 8F 97 A0 83 81 8E A0 89 A0 8D 81 8B ... . .. . ...
$0008E0 85 A0 8D 99 93 85 8C 86 A0 8C 8F 8F 8B A0 87 8F . ...... .... ..
$0008F0 8F 84 BF A0 A0 A0 A0 A0 04 A9 5D 0A A9 D0 93 AE ..? .)].)P..
$000900 B3 A9 A0 97 88 81 94 A0 85 98 81 83 94 8C 99 A0 3) .... .......
$000910 84 8F 85 93 A0 94 88 89 93 A0 90 92 8F 87 92 81 .... ... . ......
$000920 8D A0 84 8F BF A0 A0 A0 A0 84 89 93 8B A0 93 90 . ..? .... ..
$000930 81 83 85 AC A0 99 8F 95 A0 83 81 8E A0 81 84 84 ..., ... ... ...
$000940 A0 93 8F 95 8E 84 AC A0 94 85 98 94 AC A0 A0 A0 ....., ....,
$000950 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000960 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000970 A0 A0 A0 A0 A0 A0 A0 A0 25 9C 20 80 A1 4C 83 9F %. .!L..
$000980 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000990 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0009A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 87 92 81 90 88 89 83 .......
$0009B0 AC A0 81 8E 84 A0 8F 94 88 85 92 A0 8D 89 93 83 , ... .. ... ....
$0009C0 AE A0 92 8F 95 94 89 8E 85 93 A0 94 8F A0 A0 A0 . ...... .. ..
$0009D0 A0 87 85 94 A0 99 8F 95 92 A0 88 81 8E 84 93 A0 ... ... . .....
$0009E0 8F 8E A0 94 88 85 93 85 A0 90 92 8F 87 92 81 8D .. ..... .......
$0009F0 93 BA A0 A0 A0 A0 A0 A0 60 45 90 CF 38 60 06 44 .: `E.O8`.D
$000A00 A0 97 85 8C 8C AC A0 97 88 81 94 A0 94 88 89 93 ...., . ... ....
$000A10 A0 87 85 8D A0 8F 86 A0 81 A0 90 92 8F 87 92 81 ... .. . ......
$000A20 8D A0 84 8F 85 93 A0 A0 A0 8D 81 8B 85 A0 99 8F . .... .... ..
$000A30 95 92 A0 8E 81 8D 85 A0 93 94 89 83 8B A0 8F 95 .. .... ..... ..
$000A40 94 AE A0 A0 8E 8F 94 85 BA A0 89 86 A0 99 8F 95 .. .... : .. ...
$000A50 A0 A0 A0 A0 86 8F 8E 94 92 89 98 AC A0 90 89 98 .... ..., ...
$000A60 89 94 AC A0 8D 95 93 89 83 A0 8D 81 8B 85 92 AC .., .... . .....,
$000A70 A0 A0 A0 A0 A0 A0 A0 A0 60 A2 4C EA A2 A9 0C D0 `"Lj").P
$000A80 A0 89 93 A0 94 81 8B 85 A0 81 A0 88 89 AD 92 85 .. .... . ..-..
$000A90 93 A0 90 89 83 94 95 92 85 A0 81 8E 84 A0 83 92 . ...... . ... ..
$000AA0 81 8D A0 89 94 A0 A0 A0 A0 95 93 85 A0 90 89 83 .. .. ... ...
$000AB0 94 95 92 85 93 A0 8F 8E 8C 99 AC A0 8E 8F A0 85 ..... .. .., .. .
$000AC0 98 94 92 81 A0 84 89 93 8B A0 93 90 81 83 85 A0 .... ... . .....
$000AD0 A0 A0 A0 A0 87 92 81 90 88 89 83 93 A0 8D 81 87 .... .... ...
$000AE0 89 83 89 81 8E AC A0 94 88 85 A0 84 8F 83 95 8D ....., . .. .....
$000AF0 85 8E 94 8F 92 AE A0 A0 02 4C EA A2 20 AF A7 D0 ...... .Lj" /'P
$000B00 A0 89 8E A0 82 85 94 97 85 85 8E A0 84 8F 93 A0 .. .... ... ...
$000B10 81 8E 84 A0 89 94 A7 93 A0 82 95 86 86 85 92 93 ... ..'. .......
$000B20 AE AE AE 93 8F A0 A0 A0 A0 89 93 A0 92 85 91 95 ..... .. ....
$000B30 89 92 85 84 A1 A1 A1 A1 A1 A1 A0 A0 A0 A0 A0 A0 ....!!!! !!
$000B40 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000B50 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000B60 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000B70 A0 A0 A0 A0 A0 A0 A0 A0 29 01 D0 06 8E 72 AA 8C ).P..r*.
$000B80 A0 94 88 81 94 A0 97 88 85 8E A0 94 88 85 A0 84 .... .. .. ... .
$000B90 89 93 8B A0 89 93 A0 82 8F 8F 94 85 84 AC A0 99 ... .. . ....., .
$000BA0 8F 95 92 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 ...
$000BB0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000BC0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000BD0 01 02 04 15 0C 27 13 20 0F 01 13 09 13 20 20 20 .....'. .....
$000BE0 20 20 20 20 20 20 20 20 20 20 28 36 31 39 29 20 (619)
$000BF0 33 34 31 2D 32 39 38 34 B5 8D C3 B5 4C A8 A6 8C 341-2984 5.C5L(&.
$000C00 10 09 12 01 14 05 27 13 20 13 09 07 0E 01 14 15 ......'. .......
$000C10 12 05 20 20 20 20 20 0A 0F 08 0E 0E 05 19 20 01 .. . ...... .
$000C20 10 10 0C 05 13 05 05 04 A0 A0 A0 A0 A0 A0 A0 A0 ........
$000C30 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000C40 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000C50 A0 A8 97 88 89 83 88 A0 89 93 A0 8F 95 92 A0 97 (..... .. ... .
$000C60 88 8F 8C 85 A0 87 8F 81 8C AC A0 92 89 87 88 94 .... ... ., .....
$000C70 BF A9 A0 A0 A0 A0 A0 A0 13 93 AA C9 A0 F0 26 AD ?) ..*I p&-
$000C80 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000C90 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000CA0 A0 A0 A0 A0 A0 A0 A0 A0 A0 89 94 A0 97 89 8C 8C .. ....
$000CB0 A0 89 8E 83 8C 95 84 85 A0 92 8F 95 94 89 8E 85 ....... .......
$000CC0 93 A0 86 92 8F 8D A0 81 97 85 93 8F 8D 85 A0 A0 . .... . ......
$000CD0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000CE0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000CF0 A0 A0 A0 A0 A0 A0 A0 A0 04 A9 5D 0A A9 D0 93 AE .)].)P..
$000D00 B5 A9 A0 97 85 8C 8C AC A0 97 88 81 94 A0 89 86 5) ...., .... ..
$000D10 A0 89 A7 8D A0 94 8F 8F A0 8C 81 8D 85 A0 94 8F .'. ... .... ..
$000D20 A0 8D 81 8B 85 A0 A0 A0 A0 90 92 8F 87 92 81 8D .... .......
$000D30 93 A0 8C 89 8B 85 BA A0 A0 A0 A0 A0 A0 A0 A0 A0 . ....:
$000D40 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000D50 B6 A9 A0 97 88 81 94 A0 89 86 A0 89 A7 96 85 A0 6) .... .. .'..
$000D60 87 8F 94 A0 93 8F 8D 85 A0 83 8F 8F 8C A0 92 8F ... .... .... ..
$000D70 95 94 89 8E 85 93 A0 A0 26 9C 20 80 A1 4C 83 9F ...... &. .!L..
$000D80 A0 A0 A0 8D 99 A0 8F 97 8E A0 92 8F 95 94 89 8E .. .. . ......
$000D90 85 93 BF A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 ..?
$000DA0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 94 92 81 8E 93 .....
$000DB0 89 94 89 8F 8E 93 AC A0 8D 95 93 89 83 A0 8D 81 ......, ..... ..
$000DC0 8B 85 92 AC A0 94 88 85 A0 84 8F 83 AC A0 A0 A0 ..., ... ...,
$000DD0 A0 A0 A0 94 88 81 94 A0 97 8F 95 8C 84 A0 82 85 .... ..... ..
$000DE0 A0 8E 89 83 85 A0 86 8F 92 AC A0 8C 85 94 93 A0 .... .. ., ....
$000DF0 93 81 99 AC A0 A0 A0 A0 60 45 90 CF 38 60 06 44 ..., `E.O8`.D
$000E00 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000E10 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000E20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 94 88 85 A0 87 ... .
$000E30 92 81 90 88 89 83 93 A0 8D 81 87 89 83 89 81 8E ....... ........
$000E40 AC A0 85 94 83 AE A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 , ....
$000E50 A0 A0 A0 84 89 93 90 8C 81 99 89 8E 87 A0 81 A0 ..... ..... .
$000E60 88 89 92 85 93 A0 90 89 83 94 95 92 85 AE A0 A0 ..... .. ......
$000E70 97 88 85 92 85 A0 A0 A0 60 A2 4C EA A2 A9 0C D0 ..... `"Lj").P
$000E80 A0 8B 85 85 90 A0 81 8E A0 85 99 85 A0 8F 95 94 .... .. ... ...
$000E90 AE AE AE 94 88 89 93 A0 93 95 8D 8D 85 92 A0 A8 ....... ...... (
$000EA0 81 94 A0 94 88 85 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 .. ...
$000EB0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000EC0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000ED0 A0 A0 A0 84 8F A0 89 A0 93 85 8E 84 A0 94 88 85 .. . .... ...
$000EE0 8D BF A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 .?
$000EF0 A0 A0 A0 A0 A0 A0 A0 A0 02 4C EA A2 20 AF A7 D0 .Lj" /'P
$000F00 A0 96 85 92 99 A0 8C 81 94 85 93 94 A9 A0 89 A0 .... .. ....) .
$000F10 97 89 8C 8C A0 82 85 A0 92 85 8C 85 81 93 89 8E .... .. ........
$000F20 87 BA A0 A0 A0 A0 A0 A0 A0 99 8F 95 A0 97 89 8C .: ... ...
$000F30 8C A0 82 85 A0 81 82 8C 85 A0 94 8F A0 95 93 85 . .. ... . .. ...
$000F40 A0 94 88 85 93 85 A0 92 8F 95 94 89 8E 85 93 A0 ..... . .......
$000F50 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000F60 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000F70 A0 A0 A0 A0 A0 A0 A0 A0 29 01 D0 06 8E 72 AA 8C ).P..r*.
$000F80 A0 A0 A0 A0 A0 90 89 92 81 94 85 A7 93 A0 93 89 ... ...'. ..
$000F90 87 8E 81 94 95 92 85 A0 84 81 94 81 A0 90 81 83 ....... .... ...
$000FA0 8B A0 A3 B1 A0 A0 A0 A0 A0 94 8F A0 8D 81 8B 85 . #1 .. ....
$000FB0 A0 99 8F 95 A0 8C 8F 8F 8B A0 85 96 85 8E A0 82 ... ... . .... .
$000FC0 85 94 94 85 92 AE A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 ......
$000FD0 01 02 04 15 0C 27 13 20 0F 01 13 09 13 20 20 20 .....'. .....
$000FE0 20 20 20 20 20 20 20 20 20 20 28 36 31 39 29 20 (619)
$000FF0 33 34 31 2D 32 39 38 34 B5 8D C3 B5 4C A8 A6 8C 341-2984 5.C5L(&.
$001000 10 09 12 01 14 05 27 13 20 13 09 07 0E 01 14 15 ......'. .......
$001010 12 05 20 20 20 20 20 0A 0F 08 0E 0E 05 19 20 01 .. . ...... .
$001020 10 10 0C 05 13 05 05 04 94 8F A0 85 96 85 92 99 ........ .. .....
$001030 8F 8E 85 A0 94 88 81 94 A0 99 8F 95 A0 8B 8E 8F ... .... ... ...
$001040 97 A1 A0 A0 81 8E 84 A0 94 85 8C 8C A0 A0 A0 A0 .! ... ....
$001050 A0 A0 A0 A0 A0 A0 A0 B3 A0 81 90 90 8C 85 A0 83 3 ..... .
$001060 8F 8D 90 95 94 85 92 93 A0 A0 A0 A0 A0 A0 A0 A0 ........
$001070 A0 A0 A0 A0 A0 A0 A0 A0 14 93 AA C9 A0 F0 28 AD ..*I p(-
$001080 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001090 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0010A0 A0 A0 A0 A0 A0 A0 A0 A0 94 88 85 8D A0 94 8F A0 .... ..
$0010B0 83 81 8C 8C A0 81 82 84 95 8C A7 93 A0 8F 81 93 .... ... ..'. ...
$0010C0 89 93 A1 A1 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 ..!!
$0010D0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0010E0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0010F0 A0 A0 A0 A0 A0 A0 A0 A0 04 A9 5D 0A A9 D0 93 AE .)].)P..
$001100 A0 89 86 A0 99 8F 95 A0 88 81 96 85 A0 81 8E 99 .. ... .... ...
$001110 A0 87 8F 8F 84 A0 92 8F 95 94 89 8E 85 93 A0 94 .... .. ...... .
$001120 88 81 94 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 ...
$001130 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001140 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001150 88 8F 8D 85 A0 82 81 93 85 BA A0 8E 85 94 97 8F .... ... .: .....
$001160 92 8B 93 AC A0 B2 A0 84 92 89 96 85 93 A0 A0 A0 ..., 2 . .....
$001170 A0 A0 A0 A0 A0 A0 A0 A0 26 9C 20 80 A1 4C 83 9F &. .!L..
$001180 8D 89 87 88 94 A0 82 85 A0 8E 89 83 85 A0 94 8F ..... .. .... ..
$001190 A0 82 85 A0 81 84 84 85 84 A0 94 8F A0 94 88 85 .. .... . .. ...
$0011A0 A0 A0 A0 A0 A0 A0 A0 A0 89 86 A0 81 82 84 95 8C .. .....
$0011B0 A0 87 85 94 93 A0 85 8E 8F 95 87 88 A0 83 81 8C .... .. .... ...
$0011C0 8C 85 92 93 AC A0 88 85 A0 97 89 8C 8C A0 A0 A0 ...., .. ....
$0011D0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 81 90 90 8C 85 .....
$0011E0 A0 83 81 94 A0 9D 9B A0 A0 A0 A0 A0 A0 A0 A0 A0 ... ..
$0011F0 A0 A0 A0 A0 A0 A0 A0 A0 60 45 90 CF 38 60 06 44 `E.O8`.D
$001200 84 81 94 81 A0 90 81 83 8B AC A0 94 88 85 8E A0 .... ... ., ....
$001210 83 81 8C 8C A0 95 90 A0 81 82 84 95 8C A7 93 A0 .... .. .....'.
$001220 8F 81 93 89 93 A0 A0 A0 82 95 99 A0 81 A0 B3 B0 ..... ... . 30
$001230 A0 8D 85 87 81 82 99 94 85 A0 88 81 92 84 A0 84 ....... . .... .
$001240 92 89 96 85 A0 81 8E 84 A0 A0 A0 A0 A0 A0 A0 A0 .... ...
$001250 84 81 94 81 A0 93 94 81 94 89 8F 8E 93 BA A0 81 .... ... .....: .
$001260 93 83 89 89 A0 85 98 90 92 85 93 93 A0 90 92 8F .... ... .... ...
$001270 A0 A0 A0 A0 A0 A0 A0 A0 60 A2 4C EA A2 A9 0C D0 `"Lj").P
$001280 81 8E 84 A0 8C 85 81 96 85 A0 85 AD 8D 81 89 8C ... .... . .-....
$001290 A0 94 8F A0 4A 4F 48 4E 4E 45 59 60 41 50 50 4C .. JOHN NEY`APPL
$0012A0 45 53 45 45 44 A0 A0 A0 83 92 81 8D A0 89 94 A0 ESEED .... ..
$0012B0 86 95 8C 8C A0 8F 86 A0 A7 87 8F 8F 84 89 85 93 .... .. '.......
$0012C0 A7 AE A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 '.
$0012D0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 B2 2
$0012E0 A0 84 92 89 96 85 93 A0 85 81 83 88 AC A0 8D 8D ...... ...., ..
$0012F0 AF AF 85 A0 A0 A0 A0 A0 02 4C EA A2 20 AF A7 D0 //. .Lj" /'P
$001300 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001310 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001320 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001330 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001340 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001350 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001360 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$001370 A0 A0 A0 A0 A0 A0 A0 A0 29 01 D0 06 8E 72 AA 8C ).P..r*.
$001380 90 8C 85 81 93 85 A0 83 8F 90 99 A0 94 88 89 93 ...... . ... ....
$001390 A0 90 92 8F 87 92 81 8D A0 81 8E 84 A0 87 89 96 ....... ... ...
$0013A0 85 A0 89 94 A0 A0 A0 A0 83 95 92 92 85 8E 94 8C . .. ........
$0013B0 99 A0 81 82 84 95 8C A7 93 A0 8F 81 93 89 93 A0 . .....' . .....
$0013C0 89 93 A0 92 95 8E A0 8F 8E BA A0 A0 A0 A0 A0 A0 .. ... . .:
$0013D0 01 02 04 15 0C 27 13 20 0F 01 13 09 13 20 20 20 .....'. .....
$0013E0 20 20 20 20 20 20 20 20 20 20 28 36 31 39 29 20 (619)
$0013F0 33 34 31 2D 32 39 38 34 B5 8D C3 B5 4C A8 A6 8C 341-2984 5.C5L(&.
** END **
Text found in Pirates_Signature_v1.0_1984_Johnney_Appleseed.do/INTRO.bas:
10 PRINT "BLOAD DISPLAYER"
20 PRINT "BLOAD INTRO.DATA"
23 ONERR GOTO 30
25 A = 32
30 POKE 7,32: CALL 768
40 IF PEEK( -16384) <128 THEN 40
50 X = PEEK( -16384): POKE -16368,0:X = X -128
60 IF X = 8 THEN A = A -4: IF A <32 THEN A = 32
70 IF X = 21 THEN A = A +4: IF A >48 THEN A = 48
80 IF X = 13 THEN A = 32
90 IF X = 27 THEN PRINT "RUNHELLO"
100 POKE 7,A: CALL 768: GOTO 40
Text found in Pirates_Signature_v1.0_1984_Johnney_Appleseed.do/PS.bas:
1 NORMAL : TEXT : HOME :D$ = CHR$(4): REM RELOCATE?
2 POKE 768 +(256 *7),0
3 POKE 103,1: POKE 104,10: POKE 24576,0: PRINT D$"RUN PS2"
Text found in Pirates_Signature_v1.0_1984_Johnney_Appleseed.do/PS2.bas:
5 ONERR GOTO 5
6 PRINT
7 PRINT CHR$(4);"BLOAD CRUNCH"
10 PRINT "BLOAD TEMPLATE.1"
15 POKE 32,1: POKE 33,35: POKE 34,8: POKE 35,23
30 VTAB 9
40 INPUT "ENTER NAME OF PICTURE:";A$
50 PRINT : PRINT "INSERT DATA DISK THEN HIT A KEY";: GOSUB 1000
55 IF A$ = "" THEN PRINT : PRINT CHR$(4);"CATALOG": GOSUB 1000: HOME : GOTO 30
56 PRINT
60 PRINT CHR$(4);"BLOAD ";A$",A$2000"
70 HGR2 : POKE -16300,0: POKE -16302,0: GOSUB 1000: HOME
75 POKE -16303,0: VTAB 9
80 PRINT "OK? (Y/N)";: GET B$: IF B$ = "N" THEN HOME : GOTO 15
90 CALL 2051
100 LO = 8 *256 +15 *16 +12
110 LE = PEEK(LO) + PEEK(LO +1) *256 -16384
115 PRINT
120 PRINT CHR$(4);"BSAVERAD,A$4000,L";LE
125 ONERR GOTO 130
130 HOME : VTAB 9: PRINT "INSERT PIRATE'S SIGNATURE": PRINT "AND HIT A KEY": GOSUB 1000
140 HOME : PRINT : PRINT CHR$(4);"RUN PS3"
999 END
1000 POKE -16368,0: WAIT -16384,128: POKE -16368,0: RETURN
Text found in Pirates_Signature_v1.0_1984_Johnney_Appleseed.do/PS3.bas:
1 ONERR GOTO 3
2 PRINT : PRINT CHR$(4);"BSAVE TEMP.DATA,A$2000,L$100": GOTO 5
3 POKE 46921,156
5 ONERR GOTO 5
10 HOME : PRINT : PRINT CHR$(4);"BLOAD TEMPLATE.1"
20 POKE 32,1: POKE 33,35: POKE 34,8: POKE 35,23
30 ONERR GOTO 30
40 HOME : VTAB 9
50 A1$ = "APPLESOFT"
60 A2$ = "HELLO"
70 A3$ = "156"
80 PRINT "CONTINUE (Y/N):";: GET A$: IF A$ = "N" THEN END
81 PRINT A$
90 IF A$ < >"Y" THEN RUN
91 PRINT : PRINT "STANDARD CONFIGURATION?";: GET A$: PRINT A$: IF A$ = "N" THEN 100
92 IF A$ < >"Y" THEN 30
93 GOTO 200
100 PRINT "BOOT TYPE (A/B/T)";: GET A$: IF A$ = "" OR A$ = "A" THEN A1$ = "APPLESOFT"
101 IF A$ = "B" THEN A1$ = "BINARY"
102 IF A$ = "T" THEN A1$ = "TEXT"
110 PRINT A$: PRINT "BOOT FILE NAME =";: INPUT A2$: IF A2$ = "" THEN A2$ = "HELLO"
120 PRINT "HIMEM = ";: INPUT A3$: IF A3$ = "" THEN A3$ = "156
130 A3 = VAL(A3$): IF A3 >156 THEN 120
140 IF A3 <100 THEN 120
200 HOME
210 PRINT "FILE TYPE =";A1$
220 PRINT "FILE NAME =";A2$
230 PRINT "HIGH MEM. =";A3$
240 PRINT : PRINT "OK?";: GET A$: PRINT A$
250 IF A$ = "N" THEN 40
260 IF A$ < >"Y" THEN 200
300 IF A1$ = "BINARY" THEN POKE 40514,52
310 IF A1$ = "TEXT" THEN POKE 40514,20
315 ONERR GOTO 330
320 IF A1$ = "APPLESOFT" THEN POKE 40514,6
330 PRINT : PRINT "PUT DATA DISK IN DRIVE #1": GOSUB 1000
340 PRINT : PRINT CHR$(4);"BLOAD RAD,A$2000"
350 LE = PEEK(43617) +1
355 SC = 0
360 A3 = VAL(A3$):LE = A3 -LE:L2 = 159 -LE
361 L4 = L2:L3 = 0: IF L2 <11 THEN L2 = L2 +4
362 IF L2 >15 THEN L2 = L2 -15:L3 = L3 +1: GOTO 362
370 POKE 40193,LE -3: POKE 40192 +13,LE -2
371 POKE 40192 +3415, PEEK(40192 +3505): CALL 42964
372 DA = PEEK(981) *256: POKE DA +6682,L2: POKE DA +6755,L2: POKE DA +6880,27 +L4
373 IF L3 < >0 THEN POKE DA +6682 -5,2 +L3: POKE DA +6755 -5,2 +L3
375 A = (LE -1) *256
380 PRINT : PRINT CHR$(4);"BLOAD RAD,A ";A
381 ONERR GOTO 385
385 HOME : PRINT "ENTER P.S. IN DRIVE #1": GOSUB 1000: PRINT
390 PRINT : PRINT CHR$(4);"BLOAD DOC.HELPER,A$9C00"
400 POKE 39975,LE -1
410 HOME
420 PRINT : PRINT "INSERT BLANK DISK IN DRIVE #1";: GOSUB 1000: PRINT
430 PRINT "HIT Y TO CONFIRM:";: GET Z$: PRINT Z$: IF Z$ < >"Y" THEN 420
435 ONERR GOTO 40
440 PRINT : PRINT CHR$(4);"INIT";A2$
450 PRINT : PRINT CHR$(4);"DELETE";A2$
460 HOME : PRINT : PRINT "FINISHED!!!!": END
1000 POKE -16368,0: WAIT -16384,128: POKE -16368,0: RETURN
Text found in Pirates_Signature_v1.0_1984_Johnney_Appleseed.do/RAD BOARDS.txt:
Offset Hex Data Characters
======= ================================================ =================
$000000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000010 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000020 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000030 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000040 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000050 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000060 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000070 20 20 20 20 20 20 20 20 0C 93 AA C9 A0 F0 18 AD ..*I p.-
$000080 20 20 20 20 20 20 20 20 03 01 0C 0C 20 14 08 05 .... ...
$000090 13 05 20 12 01 04 20 02 0F 01 12 04 13 3A 20 20 .. ... . .....:
$0000A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0000B0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0000C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0000D0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0000E0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0000F0 20 20 20 20 20 20 20 20 04 A9 5D 0A A9 D0 93 AE .)].)P..
$000100 3D 2D 3D 2D 3D 2D 3D 2D 3D 2D 3D 2D 3D 2D 3D 2D =-=-=-=- =-=-=-=-
$000110 3D 2D 3D 2D 3D 2D 3D 2D 3D 2D 3D 2D 3D 2D 3D 2D =-=-=-=- =-=-=-=-
$000120 3D 2D 3D 2D 3D 2D 3D 2D 20 20 20 20 20 20 20 20 =-=-=-=-
$000130 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000140 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000150 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000170 20 20 20 20 20 20 20 20 28 9C 20 80 A1 4C 83 9F (. .!L..
$000180 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000190 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0001A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0001B0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0001C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0001D0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0001E0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0001F0 20 20 20 20 20 20 20 20 60 45 90 CF 38 60 06 44 `E.O8`.D
$000200 01 02 04 15 0C 27 13 20 0F 01 13 09 13 3A 2D 3A .....'. .....:-:
$000210 2D 3A 2D 3A 2D 3A 2D 3A 2D 3A 28 36 31 39 29 20 -:-:-:-: -:(619)
$000220 33 34 31 2D 32 39 38 34 20 20 20 20 20 20 20 20 341-2984
$000230 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000250 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000260 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000270 20 20 20 20 20 20 20 20 60 A2 4C EA A2 A9 0C D0 `"Lj").P
$000280 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000290 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0002A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0002B0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0002C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0002D0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0002E0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0002F0 20 20 20 20 20 20 20 20 02 4C EA A2 20 AF A7 D0 .Lj" /'P
$000300 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000310 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000320 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000330 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000340 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000350 20 1F 20 20 1F 20 20 1F 20 20 1F 20 20 1F 20 20 . . . . .
$000360 1F 20 20 1F 20 20 1F 20 20 1F 20 20 1F 20 20 1F . . . . . .
$000370 20 20 1F 20 20 1F 20 20 29 01 D0 06 8E 72 AA 8C . . ).P..r*.
$000380 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000390 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0003A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0003B0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0003C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0003D0 2F 25 1C 2F 2A 1C 2F 25 1C 2F 2A 1C 2F 25 1C 2F /%./*./% ./*./%./
$0003E0 2A 1C 2F 25 1C 2F 2A 1C 2F 25 1C 2F 2A 1C 2F 25 *./%./*. /%./*./%
$0003F0 1C 2F 2A 1C 2F 25 1C 20 B5 8D C3 B5 4C A8 A6 8C ./*./%. 5.C5L(&.
** END **
Text found in Pirates_Signature_v1.0_1984_Johnney_Appleseed.do/TEMPLATE.1.txt:
Offset Hex Data Characters
======= ================================================ =================
$000000 20 13 0F 0F 0E 3A 20 16 05 12 13 09 0F 0E 20 31 ....: . ...... 1
$000010 2E 31 20 13 0F 15 0E 04 2F 07 12 10 08 20 12 0F .1 ..... /.... ..
$000020 15 14 09 0E 05 13 20 20 20 A0 A0 A0 A0 A0 A0 A0 ......
$000030 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000040 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 20
$000050 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000060 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000070 A0 A0 A0 A0 A0 A0 A0 20 13 93 AA C9 A0 F0 26 AD ..*I p&-
$000080 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000090 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0000A0 A0 A0 A0 A0 A0 A0 A0 20 20 A0 A0 A0 A0 A0 A0 A0
$0000B0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0000C0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 20
$0000D0 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0000E0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0000F0 A0 A0 A0 A0 A0 A0 A0 20 04 A9 5D 0A A9 D0 93 AE .)].)P..
$000100 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 90 89 92 81 94 .....
$000110 85 A7 93 A0 93 89 87 8E 81 94 95 92 85 A0 A0 A0 .'. .... .....
$000120 A0 A0 A0 A0 A0 A0 A0 20 20 A0 A0 A0 A0 A0 A0 A0
$000130 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000140 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 20
$000150 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000160 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000170 A0 A0 A0 A0 A0 A0 A0 20 28 9C 20 80 A1 4C 83 9F (. .!L..
$000180 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000190 A0 A0 A0 82 99 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 ..
$0001A0 A0 A0 A0 A0 A0 A0 A0 20 20 A0 A0 A0 A0 A0 A0 A0
$0001B0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0001C0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 20
$0001D0 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0001E0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0001F0 A0 A0 A0 A0 A0 A0 A0 20 60 45 90 CF 38 60 06 44 `E.O8`.D
$000200 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 8A 8F 88 8E 8E .....
$000210 85 99 A0 81 90 90 8C 85 93 85 85 84 A0 A0 A0 A0 .. ..... ....
$000220 A0 A0 A0 A0 A0 A0 A0 20 20 A0 A0 A0 A0 A0 A0 A0
$000230 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000240 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 20
$000250 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000260 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000270 A0 A0 A0 A0 A0 A0 A0 20 60 A2 4C EA A2 A9 0C D0 `"Lj").P
$000280 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000290 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0002A0 A0 A0 A0 A0 A0 A0 A0 20 20 A0 A0 A0 A0 A0 A0 A0
$0002B0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0002C0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 20
$0002D0 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0002E0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0002F0 A0 A0 A0 A0 A0 A0 A0 20 02 4C EA A2 20 AF A7 D0 .Lj" /'P
$000300 20 20 16 05 12 13 09 0F 0E 20 31 2E 30 20 20 20 ...... . 1.0
$000310 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 36 6
$000320 2F 32 33 2F 38 34 20 20 20 A0 A0 A0 A0 A0 A0 A0 /23/84
$000330 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000340 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 20
$000350 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000360 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000370 A0 A0 A0 A0 A0 A0 A0 20 29 01 D0 06 8E 72 AA 8C ).P..r*.
$000380 20 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$000390 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0003A0 A0 A0 A0 A0 A0 A0 A0 20 20 A0 A0 A0 A0 A0 A0 A0
$0003B0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0
$0003C0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 20
$0003D0 20 01 02 04 15 0C 27 13 20 0F 01 13 09 13 20 20 .....'. .....
$0003E0 20 20 20 20 20 20 20 20 20 28 36 31 39 29 20 33 (619) 3
$0003F0 34 31 2D 32 39 38 34 20 B5 8D C3 B5 4C A8 A6 8C 41-2984 5.C5L(&.
** END **
Text found in Pirates_Signature_v1.0_1984_Johnney_Appleseed.do/THE DOCUMENTOR.bas:
0 HGR : TEXT : PRINT "BLOAD DISPLAYER":CL = 0:LN = 0: PRINT : PRINT "BLOAD DOC.HELP": POKE 7,32: CALL 768: WAIT -16384,128: POKE -16368,0: HOME
1 DIM ROW(24): FOR K = 0 TO 7:ROW(K) = 1024 +K *128:ROW(K +8) = ROW(K) +40:ROW(K +16) = ROW(K) +80: NEXT
2 ONERR GOTO 3
3 GET A$:A = ASC(A$)
4 IF A = 27 THEN ESC = ESC +1: GOTO 2
5 IF ESC > = 3 THEN ESC = 0
6 IF A <32 THEN 11
7 IF A >63 THEN A = A -64
8 A = A +128:A = A -(ESC *64): POKE ROW(LN) +CL,A:CL = CL +1: IF CL = 40 THEN CL = 0:LN = LN +1
9 IF LN = 24 THEN LN = 0:CL = 0
10 HTAB (CL +1): VTAB (LN +1): GOTO 2
11 IF A = 1 THEN GOSUB 38: GOTO 10
12 IF A = 26 THEN GOSUB 34: GOTO 10
13 IF A = 23 THEN GOSUB 50: GOSUB 52: GOTO 2
14 IF A = 24 THEN 54
15 IF A = 20 THEN LN = 0: GOTO 10
16 IF A = 2 THEN LN = 23: GOTO 10
17 IF A = 8 THEN GOSUB 36: GOTO 10
18 IF A = 13 THEN CL = 0: GOSUB 34: GOTO 10
19 IF A = 21 THEN GOSUB 32: GOTO 10
20 IF A = 11 THEN HTAB 1: CALL -868: GOTO 10
21 IF A = 4 THEN 40
22 IF A = 9 THEN 42
23 IF A = 18 THEN 44
24 IF A = 12 THEN 45
25 IF A = 3 THEN CL = 19: GOTO 10
26 IF A = 29 THEN A = 91: GOTO 4
27 IF A = 30 THEN A = 92: GOTO 4
28 IF A = 7 THEN A = 95: GOTO 4
29 IF A = 15 THEN 46
30 IF A = 16 THEN 48
31 GOTO 10: REM
32 CL = CL +1: IF CL = 40 THEN CL = 0: RETURN
33 RETURN
34 LN = LN +1: IF LN = 24 THEN LN = 0: RETURN
35 RETURN
36 CL = CL -1: IF CL = -1 THEN CL = 39: RETURN
37 RETURN
38 LN = LN -1: IF LN = -1 THEN LN = 23: RETURN
39 RETURN
40 IF CL = 39 THEN POKE ROW(LN) +CL,160: GOTO 10
41 FOR B = CL TO 38: POKE ROW(LN) +B, PEEK(ROW(LN) +B +1): NEXT : POKE ROW(LN) +39,160: GOTO 10
42 IF CL = 39 THEN GOTO 40
43 FOR B = 39 TO CL STEP -1: POKE ROW(LN) +B, PEEK(ROW(LN) +B -1): NEXT : POKE ROW(LN) +CL,160: GOTO 10
44 C = PEEK(ROW(LN) +39): FOR B = 39 TO 1 STEP -1: POKE ROW(LN) +B, PEEK(ROW(LN) +B -1): NEXT : POKE ROW(LN),C: GOTO 10
45 C = PEEK(ROW(LN)): FOR B = 0 TO 38: POKE ROW(LN) +B, PEEK(ROW(LN) +B +1): NEXT : POKE ROW(LN) +39,C: GOTO 10
46 IF LN = 0 THEN PRINT "";: GOTO 2
47 FOR B = 0 TO 39: POKE ROW(LN -1) +B, PEEK(ROW(LN) +B): POKE ROW(LN) +B,160: NEXT :A = 1: GOTO 11
48 IF LN = 23 THEN PRINT "";: GOTO 2
49 FOR B = 0 TO 39: POKE ROW(LN +1) +B, PEEK(ROW(LN) +B): POKE ROW(LN) +B,160: NEXT :A = 26: GOTO 12
50 POKE 778,48: POKE 7,4: CALL 768
51 POKE 778,4: POKE 7,36: RETURN
52 CALL 768: WAIT -16384,128: POKE -16368,0
53 POKE 7,48: CALL 768: RETURN
54 GOSUB 50: ONERR GOTO 55
55 HOME
56 GOSUB 66: GOSUB 67: GOSUB 68: IF KEY < >13 THEN GOSUB 69: GOTO 56
57 IF SEL = 0 THEN GOSUB 51: GOSUB 53: GOTO 10
58 IF SEL = 1 THEN 0
59 IF SEL = 4 THEN PRINT : PRINT "RUN HELLO"
60 IF SEL = 5 THEN HOME : PRINT : PRINT "CATALOG": PRINT : GET A$: PRINT A$:A$ = "": GOTO 55
61 IF SEL = 3 THEN 64
62 HOME : PRINT : INPUT "NAME TO SAVE AS> ";A$: IF A$ = "" THEN 55
63 GOSUB 51: GOSUB 53: VTAB 2: PRINT "BSAVE ";A$;",A$400,L$400": GOTO 55
64 HOME : PRINT : INPUT "NAME TO LOAD> ";A$: IF A$ = "" THEN 55
65 VTAB 2: PRINT "BLOAD ";A$: GOTO 54: DATA 8,6,5: DATA RETURN TO EDITING: DATA RESTART PROGRAM: DATA SAVE CURRENT TEXT PAGE: DATA LOAD TEXT PAGE: DATA RETURN TO MAIN MENU: DATA CATALOG DISK
66 RESTORE : RETURN
67 READ H,V,L: FOR X = 0 TO L: READ A$(X): NEXT : VTAB V: FOR X = 0 TO L: HTAB H: PRINT A$(X): PRINT : NEXT : HTAB H: VTAB V +SEL *2: INVERSE : PRINT A$(SEL): NORMAL : RETURN
68 WAIT -16384,128:KEY = PEEK( -16384) -128: POKE -16368,0: RETURN
69 IF KEY = 8 THEN SEL = SEL -1: IF SEL <0 THEN SEL = L
70 IF KEY = 8 THEN RETURN
71 SEL = SEL +1: IF SEL >L THEN SEL = 0
72 RETURN
Text found in Pirates_Signature_v1.0_1984_Johnney_Appleseed.do/UNPACK.txt:
Offset Hex Data Characters
======= ================================================ =================
$000000 A9 00 85 00 A9 60 85 01 A9 FE 85 08 A9 00 85 0A )...)`.. )~..)...
$000010 A0 27 A9 78 85 02 A9 40 85 03 A5 02 38 E9 28 85 ')x..)@ ..%.8i(.
$000020 02 B0 02 C6 03 A5 02 85 04 A5 03 18 69 04 85 05 .0.F.%.. .%..i...
$000030 A5 04 38 E9 80 85 04 B0 02 C6 05 A5 04 85 06 A5 %.8i...0 .F.%...%
$000040 05 18 69 20 85 07 A5 07 38 E9 04 85 07 18 90 1A ..i ..%. 8i......
$000050 A5 07 C5 05 D0 F0 A5 04 C5 02 D0 04 A5 05 C5 03 %.E.Pp%. E.P.%.E.
$000060 D0 CE A5 02 D0 B4 88 10 A9 60 24 0A 30 38 A2 00 PN%.P4.. )`$.08".
$000070 A1 00 85 0B C5 08 D0 21 E6 00 D0 02 E6 01 A1 00 !...E.P! f.P.f.!.
$000080 85 09 E6 00 D0 02 E6 01 A1 00 85 0B E6 00 D0 02 ..f.P.f. !...f.P.
$000090 E6 01 A9 80 85 0A 18 90 0D A5 0B 91 06 E6 00 D0 f.)..... .%...f.P
$0000A0 02 E6 01 18 90 AA A5 0B 91 06 C6 09 D0 A2 A9 00 .f...*%. ..F.P").
$0000B0 85 0A F0 9C 00 00 00 .. .. .. .. .. .. .. .. .. ..p....
** END **
- Addeddate
- 2014-06-11 23:09:21
- Emulator
- apple2e
- Emulator_ext
- do
- Identifier
- a2_Pirates_Signature_v1.0_1984_Johnney_Appleseed
- Scanner
- Internet Archive Python library 0.6.5
comment
Reviews
267 Views
DOWNLOAD OPTIONS
IN COLLECTIONS
Apple II Library: Applications Software Library The Software Library: Apple Computer The Emulation StationUploaded by Jason Scott on